Help for this page
my %cases = ( 'one_large' => sub { if($text=~/(stuff?)m0r3(?:[^:]*\.)?($big_strin +g)/i){my $match="$1:$2"}}, ... '@strings = ', scalar @strings, " items\n\n"; cmpthese( 0, \%cases);
$text = 4578 characters $big_string = 210724 characters ... many_small 1.05/s -- -100% one_large 630/s 60089% -- --
www.com | www.net | www.org
No recent polls found