(wil) Re: Caffeine and its delivery to monks in need

[wil]

++broquaint

I love this node! This really amused me how much this great community of Perl hackers are determined to make everything possible with Perl.

I had to add to this thread, so here's my attempt:

my $i = $caffeine_level;

for ($i = 0; $i < 100; ++$i) {
    push (@monk_needs,$caffiene);
}

- wil

[Juerd]

my $i = $caffeine_level; for ($i = 0; $i < 100; ++$i) {

The first assignment is useless, as $i's value is immediately overwritten. The loop is inefficient, as for simple loops like this, a Perlish loop is faster and easier to write: for (1..100). Yes, I changed it from 0..99 to 1..100, because 1..100 looks better and you're not using the iterator variable anyway.

- Yes, I reinvent wheels.
- Spam: Visit eurotraQ.