On Wed, Sep 11, 2002 at 07:55:37PM -0700, Amir Karger wrote:
> This is not the kind of thing to say on a mailing list
> that includes '/anick and /\ndrew, methinks.
Strange that you say that, because the heroic plight of
those amongst us with spouse and spawns has touched me,
and inspired the following little poem (it passes perl -c,
but doesn't do anything exciting):
#!perl
# My Father, the Hacker v1.0
# by Yanick Champoux (12/9/2002)
use Data::Dumper;
$diaper = new Data::Dumper ([],[]); # welcome to fatherhood, buddy
localtime => 'after supper';
study $course or 'change baby ?';
eval $ituation;
$baby => glob happily;
no warnings;
$diaper->can( wait );
$mother = grep @you, "wooooh, buster.";
BEGIN{ /The/, speech }
warn 2, put, perlgolf, @ the, index qw(and she would do it, too) ,1
or 2, map wife => hex;
our $baby; #she says
listen "and nod a lot",
s/igh/
yes, dear
/;
grep @baby, '';
open DIAPER;
eof;
push @away, y!u!ck!;
dump 'into garbage bin';
unpack new, diaper;
waitpid qw/
careful, boys can /,sqrt/!
/;
close DIAPER;
put, baby, 2, sleep;
seek $wife,'s approval',
bless "strange hobby", 'now?';
return "to perlgolf" if s.he does..;
--
Drink and dance and laugh and lie
Love, the reeling midnight through
For tomorrow we shall die!
(But, alas, we never do.) - Dorothy Parker, 'The Flaw in Paganism'
