ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Nikolay Pichtin                      2:5056/30      23 Feb 2005  22:07:35
 To : Maxim Yemelyanov
 Subject : Re: Re[2]: Hа: Сутки
 -------------------------------------------------------------------------------- 
 

 
  AC>  AVG>>> ну и для надежности - сравнить год.
  AC>  MY>>  А не проще ли
  AC>  MY>>  if (int(time/86400) == int($news_time/86400))
  AC>  MY>>  ?
 
  AC>> Проще, но результат будет неверен.
 
  MY> А, ну да, во 1-х localtime, а не gmtime; во 2-х существуют 2 хороших
  MY> дня в году...
 
 Я сделал так:
 
 use Time::Local;
 our $start_time = timelocal(59,59,23,$mday-1,$mon-1,$year);
 our $time_delta = time()-$start_time;
 и дальше
 
 if (($start_time-$ttime[0]) < $time_delta) { что-то делаем }
 * Гyбит людeй нe пивo, гyбит людeй нexвaткa пивa!
 -- Hиколай
 ----------------------------------------------------------------------
 ---
  * Origin: Истина - это вовсе не то, что можно убедительно доказать (2:5056/30)
 
 

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

Тема:    Автор:    Дата:    Сутки   Nikolay Pichtin   19 Feb 2005 20:17:37   Сутки   Ivan Frolkov   19 Feb 2005 21:46:27   Hа: Сутки   Alexander V. Gaiduk   21 Feb 2005 14:59:04   Re: Hа: Сутки   Maxim Yemelyanov   23 Feb 2005 14:21:07   Re: Hа: Сутки   Artem Chuprina   23 Feb 2005 20:48:48   Re[2]: Hа: Сутки   Maxim Yemelyanov   23 Feb 2005 21:08:05   Re: Re[2]: Hа: Сутки   Nikolay Pichtin   23 Feb 2005 22:07:35   Re: Re[2]: Hа: Сутки   Nikolay Pichtin   01 Apr 2005 19:34:58   Re: Hа: Сутки   Artem Chuprina   24 Feb 2005 01:21:16