JAPH

From perldoc: What is a JAPH?

These are the "just another perl hacker" signatures that some people sign their postings with. Randal Schwartz made these famous. About 100 of the earlier ones are available from http://www.cpan.org/misc/japh .

these are a few perl JAPH's i found, you can find them and more on the perl mail lists / newgroups

ldnhxt1# perl
$_=qq#tsee      gmx.net#;s#e#s#g;s#[^sw]#c#;s#s#ust#g;s#t#J#e;s#nus#ker#
;chop;$c=' ^^^^ ';$c='12319';@c=split/(..)/,'8234130006710523';@d=split"3"
,$c;chop;'  at  ';s#(t)ustust#$1�ano$1;.#;y#.; #ehr#;@_=$_;shift@c,substr
$_[0],$_,1,chr(ord(substr$_[0],$_)-shift@c)for$d[0]..$d[1];print"$_[0]
";
Justanother Perl hacker

ldnhxt1# perl
eval unpack u,'M*"1C/2<P,BDN-"`U+C`A(RLG*3U^>2A+48O82UZ+SME=F%L*"1C+B(G=2HG
M+"<Z,D<U4SU<(B%!.T9=5#HF-5(H)2%%/$907$`Z)B5#.E8U4BM@2&`G+EPD$+R(I.P``'
Just another Perl hacker,

ldnhxt1# perl
print`perldoc -qj`=~/"(j.*)"/
just another perl hackerldnhxt1#