Help for this page
#!/usr/bin/perl -w ... 'direct' => sub {direct(1,2,3,4,5,6);}, } );
$ perl testSubs.pl Benchmark: running assigner, direct, shifter, each for at least 2 CPU +seconds... ... shifter 294563/s -- -23% -53% assigner 384577/s 31% -- -39% direct 629222/s 114% 64% --