##
Rate lexical predecl
lexical 3996/s -- -0%
predecl 4001/s 0% --
##
##
use Benchmark 'cmpthese';
cmpthese(-2, {
predecl => sub {
my $y;
my $x;
for $x (1..10000) { $y+=$x }
},
lexical => sub {
my $y;
for my $x (1..10000) { $y+=$x }
},
});
##
##
Rate predecl lexical
predecl 4011/s -- -0%
lexical 4015/s 0% --