Perl Poetry
After having worked on some billions of lines with Perl, I wanted to have fun with that language, very close to “human” English. A quick Google search gave me some crazy poems written in Perl! Yeah, I told you it’s very close.
Here are some example:
http://www.perlguy.com/contest.html
if ((light eq dark) && (dark eq light)
&& ($blaze_of_night{moon} == black_hole)
&& ($ravens_wing{bright} == $tin{bright})){
my $love = $you = $sin{darkness} + 1;
};
http://www.perlmonks.org/index.pl?node=Perl Poetry
sleep;
pipe (drip, drip);
listen(drip, drip);
kill noises;
kill dripping;
close pipe soon, NOW;
sleep again;
listen (drip, drip);
sleep (not now);
exit (do it);
accept destiny, now;
alarm neighbors;
get the keys now, &;
open (up, &survey them);
crypt of,darkness;
not a single;
pipe here,anywhere;
If you can’t do it in Perl, you don’t want to do it 
