| http://www.w3.org/ns/prov#value | - 2 => { > grep_eq_expr => '$::a1 = grep $_ == 50, @::array', > grep_eq_blck => '$::a2 = grep {$_ == 50} @::array', > }; > > __END__ > Rate grep_eq_blck grep_eq_expr > grep_eq_blck 28902/s -- -5% > grep_eq_expr 30282/s 5% -- > > > If, however, the expression is a regexp, things change drastically: > > use Benchmark qw /cmpthese/; > > our @array = 101 .. 200; > > cmpthese -2 => { > grep_re_expr => '$
|
