hfb writes "I finally got around to updating the JAPH file on the CPAN. Abigail sent in her entire collection as well as a few others who sent in their favourite JAPHs. I also found a number of very clever specimens on perlmonks and on the FWP mailing list..
Please send JAPHs, corrections, additions, attributions, etc. to japh@history.perl.org."
perl -e 'print map { substr(q(jeer hark hot cruel pants),ord($_)-65,1)} split(//,"AQYMEGWLXFBDJUCHSNKVOIRPT")'