japh

(programming)A Perl program which prints "Just another Perlhacker" using extremely obfuscated methods, typically onesbased on obscure behaviours of sometimes rarely-used functions,in the spirit of the Obfuscated C Contest.

The obfuscation can result from the code being totalgibberish, e.g.:

$_="krJhruaesrltre c a cnp,ohet";$_.=$1,print$2while s/(..)(.)//;

or from having "Just another Perl hacker" embedded in opaquecode:

$_='987;s/^(\\d+)/$1-1/e;$1?eval:print"Just another Perl hacker,"';eval

or from looking like it does something simple and completelyunrelated to printing "Just another Perl hacker":

$_ = "wftedskaebjgdpjgidbsmnjgc";tr/a-z/oh, turtleneck Phrase Jar!/; print;

Examples.

japh

japh

JAPH