my (undef, $mins, $hours, $days) = gmtime($array[8]/1000); $days--; printf "%02d:%02d:%02d\n", $days, $hours, $mins;