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.
Run it and see! Who says the excessive punctuation required in Perl makes its programs look ugly? ;)#!/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
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 | |
Re: Fun With Reserved Keywords
by menolly (Hermit) on Sep 16, 2003 at 17:16 UTC | |
Re: Fun With Reserved Keywords
by Felonious (Chaplain) on Sep 12, 2003 at 13:31 UTC | |
Re: Fun With Reserved Keywords
by jbware (Chaplain) on Feb 13, 2004 at 21:00 UTC |
Back to
Obfuscated Code