my $scs = shift; my $dlt = ParseDateDelta($scs . " seconds"); $nlt = Delta_Format($dlt,0,"%dv days,%hv hours,%mv mins & %sv secs"); print "$scs = $nlt\n";