Re: Re: Re: Aaah, spring (A Very Special Perlmonks Contest)

Very good! I'm amused. But s/pox/plague/ (sorry, I'm a pedant, I know).

Update: I've just double-checked and, interestingly, both plague and pox are right - it varies between the original sources.

Comment on Re: Re: Re: Aaah, spring (A Very Special Perlmonks Contest)

Replies are listed 'Best First'.
Re: Re: Re: Re: Aaah, spring (A Very Special Perlmonks Contest) by Toad (Initiate) on Apr 22, 2002 at 19:53 UTC
Bah, can't figure how to reply to the original message. (My first contribution ever, and it has to be this .. oh, the shame! The humanity!) `for (1) { for (1) { my @breach = ("dear", "friends"); }} # Henry V, of course # I know, hardly obtuse enough, but then being a mere novice ... my ($prick, $tickle, $wrong); my ($bleed, $laugh, $revenge) = undef; if ($prick) { $bleed = 1; } if ($tickle) { $laugh = 1; } if ($wrong) { $revenge = 1; } # Or warn "bleed" if /prick/; warn "laugh" if /tickle/; warn "revenge" if /wrong/;` [download] Toad	[reply] [d/l]

Replies are listed 'Best First'.

Re: Re: Re: Re: Aaah, spring (A Very Special Perlmonks Contest)
by Toad (Initiate) on Apr 22, 2002 at 19:53 UTC

for (1) {
for (1) {
  my @breach = ("dear", "friends");
}}

# Henry V, of course

# I know, hardly obtuse enough, but then being a mere novice ...

my ($prick, $tickle, $wrong);
my ($bleed, $laugh, $revenge) = undef;

if ($prick)
{ $bleed = 1; }
if ($tickle)
{ $laugh = 1; }
if ($wrong)
{ $revenge = 1; }

# Or

warn "bleed" if /prick/;
warn "laugh" if /tickle/;
warn "revenge" if /wrong/;
[download]

[reply]
[d/l]