#/!usr/bin/perl


my ($potential, $abilities) = (100, 0);
while ($abilities < $potential) {
   $abilities++;   # use perl monks; use books;
}

[download]

--Coplan

Replies are listed 'Best First'.
Re: Increasing Your Abilities With Perl
by damian1301 (Curate) on Feb 17, 2001 at 01:33 UTC
    A little short, so I added some extra.
    #/!usr/bin/perl


my ($potential, $abilities) = (100, 0);
while ($abilities < $potential) {
   $abilities++;   # use perl monks; use books;
}
$life=qq(Eternal\)\;
use PerlMonks;
use Books;
my $time = PerlMonks->new;
my $money= Books->new;);
if($time and $money = 0){
    die;
}else{
    goto PerlMonks && buy(books);
}

    [download]
    Hope it works :)

    Almost a Perl hacker.
    Dave AKA damian
    I encourage you to email me
[reply]
[d/l]

Back to Perl Poetry