Emboldened by my deciphering results of yesterday (and inspired by this
), I decided to create the first (AFAIK) palindromic JAPH. Though the algorithm isn't terribly obfuscated, I took a harder route by not including any comments in the code, because otherwise you could do something like
print "Just another Perl hacker,\n"; # ;"n/,rekcah lreP rehtona tsuJ" tnirp
So everything you see here is parseable by perl (although, as the saying goes, I'm not quite sure why
Each line is character-reversed, with the exception of parentheses and braces (which are balanced), and the slash chars "/" and "\", which are exchanged for their counterparts, because it just looks better.
print$_.$",for@tilps;print$/ ; \$tnirp;split@rof,"$._$tnir