#!/usr/bin/perl use strict; use warnings; use Benchmark qw /cmpthese/; our ($x, $y); cmpthese -1 => { sub => sub {$::x ++}, string => '$::y ++', } __END__ Rate sub string sub 9175039/s -- -29% string 12862205/s 40% --
Abigail
In reply to Re: undef speedup ?!
by Abigail-II
in thread undef speedup ?!
by powerman
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |