Select Code to Download

    my $start_run = time();
    use strict;
...
    my $end_run = time();
    my $run_time = $end_run - $start_run;
    print "Time taken: ".$run_time." sec\n";

use strict;
use warnings;
...
my $end_run = time();
my $run_time = $end_run - $start_run;
print "Time taken: ".$run_time." sec\n";