Select Code to Download

sub Root2 {
my $num        = shift;
...
}
return $current;
}

timethese(10,{
    'Root'=> sub {Root(1000,60)},
    'Root2'=> sub {Root2(1000,60)}});