Select Code to Download

use strict;
use warnings;
...
my $total_time_in_seconds = sum(@times_in_seconds);
my $total_time_in_minutes = $total_time_in_seconds/60;
my $total_time_in_hours = $total_time_in_minutes/60;

use Date::Manip;

...
}

print $t->printf("%hyh:%02mmm:%02sss\n");