#!/usr/bin/perl my $eyes = "closed"; my $heart = "aching"; my $beloved = "gone"; no warnings; my $love = (); open MY,"mind"; foreach ($love) { open MY,$eyes; tell my $mind or open my $eyes; } do not $fear and do not die; $i; die "because i love you\n"; do { $i; sleep($_) } while ( $awake ); warn "$me" if ($i == $wrong); bind my $love, $dear and do not exit; for (my $world = "dark") {}; for (my $eyes = "blind") {};
This one just sprang out of my "vi" - it should compile without warnings or errors.
output:
"because i love you"
I guess i wrote it to fight the sadness in me after my girl left me about 6 months ago. :(
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: why.pl
by ghenry (Vicar) on May 12, 2005 at 09:06 UTC | |
by BerniBoy (Acolyte) on May 13, 2005 at 06:34 UTC | |
by ghenry (Vicar) on May 13, 2005 at 09:18 UTC | |
by BerniBoy (Acolyte) on May 13, 2005 at 11:13 UTC | |
Re: why.pl
by liverpole (Monsignor) on Aug 23, 2005 at 01:30 UTC | |
Re: why.pl
by stonecolddevin (Parson) on Jun 07, 2005 at 06:42 UTC |
Back to
Perl Poetry