Jump to content

Just another Perl hacker

From Wikipedia, the free encyclopedia
This is an old revision of this page, as edited by Taw (talk | contribs) at 20:49, 19 December 2001 (from FOLDOC). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.
(diff) ← Previous revision | Latest revision (diff) | Newer revision → (diff)

A Perl program which prints "Just another Perl hacker" using extremely obfuscated methods, typically ones based on obscure behaviours of sometimes rarely-used functions, in the spirit of the Obfuscated C Contest.

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

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

or from having "Just another Perl hacker" embedded in opaque code:

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

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

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

See also: Obfuscated Perl contest


This article or earier version of it contains material from FOLDOC article japh, with permision.