Select Code to Download

use Benchmark qw(cmpthese);

...
cmpthese(-1, { ita => sub { my @r = min_max_avg(\@nums) },
           simple => sub { my @r = my_mma(\@nums) } })

        Rate    ita simple
ita    222/s     --   -50%
simple 449/s   102%     --