ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Andrew Alakozow                      2:5061/6       18 Dec 2003  14:07:17
 To : Ivan Frolcov
 Subject : Re: Дата
 -------------------------------------------------------------------------------- 
 

 IF>>> Можно. Дата - это количество секунд, прошедших с 1 января 1970 года.
 IF>>> Стало быть, прибавив к имеющейся дате число секунд, составляющих двое
 IF>>> суток.
 AA>> Можно попасть на перевод часов на летнее/зимнее время.
 
 IF> Что, уже стали возможными путешествия во времени? Т.е. за квант времени
 IF> - время, говорят, квантуется, может пройти 3600 секунд? Удивительное
 IF> рядом.
 
 Обычно требуется календарная дата, а не астрономическая.
 
 use Time::Local;
 
 my $day = timelocal(0,0,0,25,9,103);
 
 print scalar localtime $day, "\n";
 print scalar localtime $day + 86400*2, "\n";
 
 Можно брать середину дня, тогда вариант с добавлением секунд для получения
 даты работает.
 
 my $day = timelocal(0,0,12,25,9,103);
 
 print scalar localtime $day, "\n";
 print scalar localtime $day + 86400*2, "\n";
 
 aa29
 --- Microsoft Outlook Express 6.00.2720.3000
  * Origin: Life In The Dark (2:5061/6)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    Re: Дата   Ivan Frolcov   18 Dec 2003 13:02:27   Re: Дата   Andrew Alakozow   18 Dec 2003 14:07:17