Re^2: Multiple Regex's on a Big Sequence

That looks wrong to me, since therre is no need to constuct the $ra 100 times. Try it this way. Also try it with more patterns or do you search only for two?

...
my $t4 = new Benchmark;
my $ra = Regexp::Assemble->new();
$ra->add(@strings);
for (1..100) {
        while ( $sequence =~ /$ra/g) { my $val = pos($sequence) - 6; }
        }
[download]

Boris

Comment on Re^2: Multiple Regex's on a Big Sequence - Benchmark Download Code

Replies are listed 'Best First'.
Re^3: Multiple Regex's on a Big Sequence - Benchmark by bernanke01 (Beadle) on Aug 18, 2006 at 02:01 UTC
Hey, I'll try that. However, I figured that if it were a timing test I'd have to compare 100 repeats of everything, and that included construction of the RA. Otherwise it's an apples-to-oranges comparison where one method had the chance to do up-front work and the others didn't. I'll post benchmarks on that in a few minutes though and we can see if it makes a difference.	[reply]