Re^2: Scoping of my with foreach loop


more useful options
	PerlMonks

Re^2: Scoping of my with foreach loop

by holli (Abbot)

on Mar 07, 2005 at 20:34 UTC ( [id://437308]=note: print w/replies, xml )

Need Help??

in reply to Re: Scoping of my with foreach loop
in thread Scoping of my with foreach loop

use Benchmark;

my @array = (1..999999);

timethis (200, sub { my $foo; for $foo ( @array ) { 1; } });
timethis (200, sub { for my $foo       ( @array ) { 1; } });

#timethis 200: 33 wallclock secs (31.58 usr +  0.02 sys = 31.60 CPU) @
+  6.33/s (n=200)
#timethis 200: 32 wallclock secs (31.65 usr +  0.04 sys = 31.69 CPU) @
+  6.31/s (n=200)
[download]

seems to be optimized (perl 5.8.6)

holli, /regexed monk/

Comment on Re^2: Scoping of my with foreach loop Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://437308]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others contemplating the Monastery: (4)

As of 2024-04-25 13:11 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found