With apologies to Samuel Taylor Coleridge

if (sleep() and sleep ($dreamed) and
    ($dream = grep {/beautiful/} @{$heaven{'flower'}})) {
  alarm();
}

$SIG{ALRM} = sub {
  $your{'hand'} = $flower;
  exit (rand(1000));
}
[download]

Original text:

What if you slept? And what if, in your sleep you dreamed? And what if in your dream, you went to heaven and there plucked a beautiful flower? And what if, when you awoke you had the flower in your hand? Ah, what then?

Comment on With apologies to Samuel Taylor Coleridge Download Code

Replies are listed 'Best First'.
Re: With apologies to Samuel Taylor Coleridge by damian1301 (Curate) on Feb 18, 2001 at 09:58 UTC
Man, this is the second poem today that didn't use code tags correctly or not at all :). No offense but surround your code with <code> tags...much easier to read taht way. Other than that I like it and ++ Almost a Perl hacker. Dave AKA damian I encourage you to email me	[reply]
Re: With apologies to Samuel Taylor Coleridge by archon (Monk) on Feb 18, 2001 at 10:20 UTC
call it poetic license (= ... fixed.	[reply]
Re: With apologies to Samuel Taylor Coleridge by Rudif (Hermit) on Feb 19, 2001 at 05:44 UTC
As poetry goes, I much prefer the original ;-) Would I love a dream like this to come true! In fact I liked it so much that I ran it as a perl script (without use strict, though). Quoth perl: Bareword found where operator expected at H:\devperl\perlmonks\Noname1 +.pl line 5, near "? And what if, in your sleep you dreamed? And" (Missing operator before And?) Unquoted string "dream" may clash with future reserved word at H:\devp +erl\perlmonks\Noname1.pl line 5.?) Unquoted string "flower" may clash with future reserved word at H:\dev +perl\perlmonks\Noname1.pl line 5.?) syntax error at H:\devperl\perlmonks\Noname1.pl line 5, near "? And wh +at if, in your sleep you dreamed? And what " Execution of H:\devperl\perlmonks\Noname1.pl aborted due to compilatio +n errors. [download] Not too bad, only 4 compilation errors. And think of future perl reserved words "flower" and "dream"! Rudif	[reply] [d/l]