Convert time interval from seconds to days, hours, minutes, seconds with perl.


use Time::Interval;
$data = parseInterval(seconds => $intervalseconds);
print "$data->{days} d $data->{hours} h $data->{minutes} m $data->{seconds} s\n";