Select Code to Download

$_='Just';
$_='"...erxpnU;yerC;erugban;gfhW"gavec';

$-='another Perl';

y/\\abcdefghijklmnopqrstuvwxyz ;
/'nopqrstuvwxyzabcdefghijklm                    /;

$-='Hacker'; #again, this is just filler
y/!!ABCDEFGHIJKLMNOPQRSTUVWXYZ       ;
/''NOPQRSTUVWXYZABCDEFGHIJKLM /;  #here's that translation I spoke of

eval reverse  $_;

''.''.''.''.''.'print "Just another Perl Hacker"';