http://qs1969.pair.com?node_id=290607

Here's a list of words. But not just any words, they are all keywords in Perl. Strangely, this plain ol' list of keywords is a working Perl program.
#!/usr/bin/perl not exp log srand xor s qq qx xor s x x length uc ord and print chr ord for qw q join use sub tied qx xor eval xor print qq q q xor int eval lc q m cos and print chr ord for qw y abs ne open tied hex exp ref y m xor scalar srand print qq q q xor int eval lc qq y sqrt cos and print chr ord for qw x printf each return local x y or print qq s s and eval q s undef or oct xor time xor ref print chr int ord lc foreach qw y hex alarm chdir kill exec return y s gt sin sort split
Run it and see! Who says the excessive punctuation required in Perl makes its programs look ugly? ;)

Update: (3 Sept 2005) Takesako has written a program which generates JAPHs of this form: ppencode

blokhead

Replies are listed 'Best First'.
Re: Fun With Reserved Keywords
by Chady (Priest) on Sep 11, 2003 at 09:17 UTC

    This is a really cool obfu. and it's the first time I attempt to crack an obfuscation. Please correct me where I'm wrong

    (spoilers in readmore)

    I hope I got it right?


    He who asks will be a fool for five minutes, but he who doesn't ask will remain a fool for life.

    Chady | http://chady.net/
Re: Fun With Reserved Keywords
by menolly (Hermit) on Sep 16, 2003 at 17:16 UTC
    That would be a great shirt design!
Re: Fun With Reserved Keywords
by Felonious (Chaplain) on Sep 12, 2003 at 13:31 UTC
    This is one of the most original ideas I've seen in a while. Very impressive!
    -- So prophesied the shakespearean monkeys, and so it shall be.
Re: Fun With Reserved Keywords
by jbware (Chaplain) on Feb 13, 2004 at 21:00 UTC
    Sweet. blokhead++