in reply to Does it Iactually/I run faster?
Benchmarking it on my machine shows the multi line version running faster than the one liner.
Output:
multi line: 5 wallclock secs ( 5.04 usr + -0.01 sys = 5.03 CPU) @ 19880.72/s (n=100000)
one line: 5 wallclock secs ( 5.72 usr + 0.00 sys = 5.72 CPU) @ 17482.52/s (n=100000)
use Benchmark; @array = ('elementary school', 'blah blah blah', 'stuff', 'hello', 'ya +y'); timethese(100000, { 'one line' => '&one_line', 'multi line' => '&multi_line'}); sub one_line { do {s/\s+/\t/; s/elementary/my dear Watson/g;} for @array; } sub multi_line { for ( @array ) { s/\s+/\t/; s/elementary/my dear Watson/g; } }
Output:
multi line: 5 wallclock secs ( 5.04 usr + -0.01 sys = 5.03 CPU) @ 19880.72/s (n=100000)
one line: 5 wallclock secs ( 5.72 usr + 0.00 sys = 5.72 CPU) @ 17482.52/s (n=100000)
|
---|
Replies are listed 'Best First'. | |
---|---|
RE: Re: Does it Iactually/I run faster?
by vkonovalov (Monk) on Jul 04, 2000 at 19:27 UTC | |
by maverick (Curate) on Jul 04, 2000 at 21:03 UTC | |
by eduardo (Curate) on Jul 04, 2000 at 20:24 UTC | |
RE: Re: Does it Iactually/I run faster?
by greenhorn (Sexton) on Jul 06, 2000 at 01:25 UTC |
In Section
Seekers of Perl Wisdom