Letters to the Editor Japh

This one won't be obvious until you find the hidden clue and follow its instructions.

Running the program reveals the clue.

sub sub {$"='
jJPPJPJJjppHjpHAjpHAjpHAjpHAjPhAjpHAjpHAjpHAjpHAjpHAjpHAjpHAjpHAjpHAjp
HAjphajphajPhAjPhajPhaJPhAjphaJPHAJPHAJPHAJPhAJPhaJPHaJphajPhaJphaJPhA
jpHAJPHAJPHaJphajpHAjPhAjpHaJpHaJphaJphajPhAJPHAJPHAjPhAJPHaJpHAJPHAJP
HAjphajpPhjJPpjPJJAHHJaAAjAPhhJPJjahaPaPpaapaaAHahjpjJahaJAPPJapaaJPJJ
aPpjaPpAaPAJapAjAPaAAPhpjpjJapHaapaaAhJhAhJHaPjAaPAHAPaAJPHJJpjjahjhap
jaahapApAaJPjjaJPPApjaaHjjAPPjjPJjahAHaPpAahajApPJjpjJapJajPJJJpJPjphP
AHjjApHjjpjpjpjjAHHjjjppjpjjAHHjApAAAHpjAHAjApAAApHpAHjHAppAApHHApHpjp
JJApjaapHpApAjjpjjApAAApAjAppAahAjjpjjAppAApHpjpjjApAHAHApAppAApHAjpHj
JPjjAhapaPPaaPHaJpjjAPhHAHjpjpJJApAAAPhaApJaApjhaHJhJPhPjPJjjPJjAaJJap
aaAHjPapApaPHHAhJPAphaJpJJahhjJJppjpJJAhhjaPjAjPJjAHJhApAaaPjaaHJPApjH
APPjJPjjjpPJAHjPaPaaaPaHApAAAHPJjpjjahjhapAaapJaAHjpaPjHAPPJJPJjaPpaaP
HpJPJjApAAaPHAAPJAaPjhaHjHjppAJPjjApaPAPhHAHJPJpjjAHaJAppJapaaJpJJApJh
AppJApjAahJPJPHPJpJJAhJHApAAAHaJJPJjAhhJjjppjPjjAHhJaaPhAJPpAPJAAaJJap
pjAAHAjpHpjpjjjpjjAjpAApHpjpjjAHApAppAApHAjpHjjpjjAHAjAHjpAHpAjpjjApHH
ahaaahAjjpjjApAjAppAApApApApaPAAahjpApAAApHpAHAjjpjjApjHApHHApHjApHHah
JPjpjJaHJhaPJHaPPJapAaapHAApaaAHJhjphPJPjjjpJJahHJJjpPJpJJJPphJPhajpha
JPHAjPhAJPHAjphajphajPhAjpHAJPhaJPHAjpHaJpHaJpHAjPhAJPHAJPHAjPhAjPhAJP
haJPhajphaJPhAJPhaJPHaJpHAjphajphajphaJPhAjPhAjpHaJPhAjphaJPHaJPhaJpha
JPHAjpHAJPHAjphajPhAjPhAjpHAJPHAJPHaJpHaJpHaJpHAjPhAJPHAJPpHjJPpahHpAH
hPppApAjJJJaJjJhAAJapaJJaaHAaaApaappPhPPPPjjaahJAJhAHJJpPPPJAPapHPJAPh
';$_=$"&&s+\n++g;{$"!~s((.))() or$O=$O<<2|index lc"jApH",lc$1;unless (
++$%%4){'~'ne($O=chr$O)?print$O:exit}redo}}$==& sub(liverpole.8/13/06)
[download]

Update: modified clue to take advantage of Ray Smith's observations.

Update 2023-07-12: modified to get rid of no longer supported $* variable

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

Comment on Letters to the Editor Japh Download Code

Replies are listed 'Best First'.
Re: Letters to the Editor Japh by jcoxen (Deacon) on Aug 14, 2006 at 13:15 UTC
How truly COOL!!! ++ I believe that this proves, for once and for all, the inherent superiority of VI and it's children over EMACS. 'scuse me while I duck and run! ;) Jack	[reply]
Re: Letters to the Editor Japh by ysth (Canon) on Aug 14, 2006 at 21:20 UTC
vim-free: `GET 'http://perlmonks.org/?node_id=567147;displaytype=displaycode' \| less -p '[JaPh]'`	[reply] [d/l]
Re: Letters to the Editor Japh by Ray Smith (Beadle) on Aug 14, 2006 at 14:40 UTC
Note as we saw, <Reveal this spoiler or all in this thread>	[reply]
Re: Letters to the Editor Japh by chargrill (Parson) on Aug 15, 2006 at 02:03 UTC
You know, I always suspected there was something sick and twisted or at least seriously amiss in greater Boston. For a while, I thought it was my in-laws (who live on the north shore of Boston) - but this tears it - it's GOTTA be you. Very well done! liverpole++ (Can I only give one ++? Drat!) --chargrill `$,=42;for(34,0,-3,9,-11,11,-17,7,-5){$.=pack'c'=>$,+=$_}for(reverse s +plit//=>$ ){$%++?$ %%2?push@C,$_,$":push@c,$_,$":(push@C,$_,$")&&push@c,$"}$C[$# +C]=$/;($#C >$#c)?($ c=\@C)&&($ C=\@c):($ c=\@c)&&($C=\@C);$%=$\|;for(@$c){print$_^ +$$C[$%++]}` [download]	[reply] [d/l]
Re: Letters to the Editor Japh by wulvrine (Friar) on Aug 14, 2006 at 14:54 UTC
Oh the humanity! I feel so dirty! lol Awesome job as always ++! s&&VALKYRIE &&& print $_^q\|!4 =+;' *\|	[reply]
Re: Letters to the Editor Japh by mikeock (Hermit) on Aug 14, 2006 at 17:32 UTC
Wow! That is totally awesome. By the time I finished I had 4 or 5 people trying to see what it said. My sig Sucks!	[reply]


P is for Practical
	PerlMonks