Select Code to Download

use Benchmark;

my $start_time = new Benchmark;
...
my $end_time = new Benchmark;
my $execution_time = timediff($end_time, $start_time);
print timestr($execution_time);