My first poetry - I Love You by Sarah Mclachlan
use strict;
my ($I,$me) = 'have a ';
my $smile = 'stretched from ear to ear' ;
my $you = 'walking down the road ';
$I = 'see you '.$you;
my ($we, $us) = 'meet at the lights';
$I = 'stare ';
my $while = 1;
for ($while == 1) {
while ($while) {
my $world; $world = $world.$me.$world;
undef $world;
undef $us;
undef $while;
}
}
$you and $I ;
my $island = $you.$I and 'hope';
my $mile = 5280x' ';
$island =~ s/ /$mile/g if ( $you.1x'breath'.$me );
if ( defined $us ) {
$you = $me.$you.$me ;
my %sea = ( to => "your shore");
$you = seek 'calm', $me, 0 ;
}
if ( 'every' and time and $I eq 'close to '.$you ) {
print 9999x"I love you!!! ";
}
else {
$you = 'walk away ';
}
# remember to uncomment before running
# print 'I love you! ';
my $night = 9999;
while ($night) {
my $cold+= $night-- if (! defined $us);
$I = &grieve;
}
sub grieve {
my $strength = 0;
print 'I need you so' if ( $strength );
}
-
dystrophy -