Select Code to Download

use strict;
use Benchmark;
...
    'third' => \&third_one,
    'fourth' => \&fourth_one,
});

Benchmark: timing 10000 iterations of first, fourth, second, third...
     first:  6 wallclock secs ( 6.02 usr +  0.00 sys =  6.02 CPU) @ 16
+61.68/s (n=10000)
    fourth: 12 wallclock secs (11.98 usr +  0.00 sys = 11.98 CPU) @ 83
+4.86/s (n=10000)
    second:  7 wallclock secs ( 6.00 usr +  0.00 sys =  6.00 CPU) @ 16
+67.22/s (n=10000)
     third:  9 wallclock secs ( 9.57 usr +  0.00 sys =  9.57 CPU) @ 10
+44.50/s (n=10000)