Select Code to Download

use Benchmark 'cmpthese';

...
});

__END__

          Rate lexical predecl
lexical 3996/s      --     -0%
predecl 4001/s      0%      --

use Benchmark 'cmpthese';

...
        for my $x (1..10000) { $y+=$x }
    },
});

          Rate predecl lexical
predecl 4011/s      --     -0%
lexical 4015/s      0%      --