NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.
All the Perl that's Practical to Extract and Report
Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.
Eh? (Score:2)
For my results, I used ruby 1.6.7 and perl 5.8.0 on Mandrake 9. I took the sample text you gave in your journal entry and copied it over and over until I ended up with a 2.4 MB file. I used "bzip-0.21" as the target. Hopefully, I didn't screw up the logic.
I've provided the exact b
Re:Eh? (Score:1)
Anyway, I actually was able to get the benchmark on the Perl test significantly lower by doing 2 things:
I precompiled the regexp
I joined the relevant search fields using an (assumedly) unused char (^A) and searched on that.
On my box that put the average from around 37 secs. to around 26 secs. (Using djberg96's benchmark version of the script).
use Benchmark;
use strict;
my
Re:Eh? (Score:1)
Thanks.
Buck
Reply to This
Parent