JAPH 

print "Just another Perl hacker,\n";
print scalar reverse "\n,rekcah lreP rehtona tsuJ"
BEGIN {$^H {q} = sub {$_ [1] =~ y/S-ZA-IK-O/q-tc-fe-m/d;
$_ [1]}; $^H = 0x28100} print "Just another PYTHON hacker\n";