Select Code to Download

my $greatest = 0;
my $total    = 0;
...
my $t1 = Benchmark->new;
my $td = timediff($t1, $t0);
print "the code took:",timestr($td),"\n";