Select Code to Download

sub sec_to_ddmmss {
    my $t = shift;
    return int($t / 86400), (gmtime($t))[2, 1, 0];
}