Проблема со временем в Perl!

[kentochek]

Народ подскажите если кто знает!Такая проблема: есть ли какая-нибудь функция в Perl, которая переводит количество секунд с 1970 года в нормальное время, т.е. к примеру у нас есть число 10234857656 и как узнать какая это дата, сколько времени и.т.д????????

 

[_serg_]

my ($second, $minute, $hour, $day, $month, $year) = (localtime)[0..5];
$year += 1900;

подробнее - читай описание функции localtime