diff --git a/Perl-Client-AccountName.md b/Perl-Client-AccountName.md
index b86d518..1bf21a6 100644
--- a/Perl-Client-AccountName.md
+++ b/Perl-Client-AccountName.md
@@ -2,6 +2,6 @@ AccountName.
 ### Example
 
 ```perl
-my val = $client->AccountName();
-quest::say(val); # Returns string
+my $val = $client->AccountName();
+quest::say($val); # Returns string
 ```
\ No newline at end of file