in reply to Re^2: dice's coefficient
in thread dice's coefficient
use Benchmark qw(cmpthese); my $str = 'wwibblewibblewibblewibbleibblewibblewibblewibble'; cmpthese -1, { regex => sub { () = $str =~ /(?=(..))/g }, substr => sub { () = map { substr $str, $_, 2 } (0 .. length($str) + - 2) }, }; Rate regex substr regex 13917/s -- -30% substr 19910/s 43% --
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^4: dice's coefficient
by AnomalousMonk (Archbishop) on Jan 14, 2012 at 12:00 UTC | |
by Anonymous Monk on Jan 15, 2012 at 02:27 UTC |