There's more than one way to do things | |
PerlMonks |
Cheers,
Paul
use Carp qw/cluck/; my @chickens; sleep until $dawn; cluck $loudly until open $coop; exit $coop; chomp $food and accept($scraps,$seed); shift @straw, pop @eggs and cluck $more; until ($dusk) { seek($many,$worms,$bugs); join flock($other,@chickens) if split /from others/; tell WORLD,"sky is falling" if $airplane; } return 2,$coop and sleep until $dawn;
I can't believe I just posted that.
|
---|
Replies are listed 'Best First'. | |
---|---|
(MeowChow) Re: my @chickens
by MeowChow (Vicar) on Oct 05, 2001 at 07:15 UTC | |
by pjf (Curate) on Oct 05, 2001 at 16:57 UTC | |
Re: my @chickens
by John M. Dlugosz (Monsignor) on Oct 04, 2001 at 08:18 UTC | |
by pjf (Curate) on Oct 04, 2001 at 08:44 UTC | |
Re: my @chickens
by blackjudas (Pilgrim) on Oct 04, 2001 at 22:37 UTC | |
Re: my @chickens
by FlashM (Novice) on Oct 07, 2001 at 09:07 UTC | |
Re: my @chickens
by Elliott (Pilgrim) on Oct 07, 2001 at 21:37 UTC | |
by buckaduck (Chaplain) on Oct 09, 2001 at 16:24 UTC |