My first ever bit of Perl poetry. It compiles and runs without error on various Linux distros, OpenBSD and Win XP. I guess I'll do some more work on it when I get a chance. I think the last stanza is the best. I hope you like it.

#!/usr/bin/perl

untie $me; open $doors;
for ($ever){ join 
$me, 'and', $you;
last or sleep and die;}

map $our $future or kill my $hopes;
my %hope = ('to','be','with','you');
open $doors unless $I&  break;
$Read= each %hope and wait;

times; shift and tell;
warn my $friends; warn
for($they_are_not_safe);
$I& sort and study time;

wait for($me);
close $doors and sin
bind (You_and, me);
$please= wait and $see;

if ($you){ chop( my $words);}
my %hopes& break and die ;
if($you){split 'from', $me;}
$I= 'cry' and die 'inside';


# A perl poem by
# chris lacy-hulbert
# October 12th 2003
[download]