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