ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     07 Aug 2003  10:35:40
 To : Igor Zinkovsky
 Subject : Re: Календарь?
 -------------------------------------------------------------------------------- 
 

 Хмутро.
 
 IZ>  >>   Как бы сотворить сабж на PERL? Или хотя бы вытащить некую
 IZ>  >> ассоциативную связь между числом месяца-названием дня недели?
 
  IF>> perldoc -f localtime
 
 IZ> определение послденего дня месяца (30/31) включая высокосные года?
 
 perldoc Time::Local, и тупо - преобразование даты в unixtime, смещение на
 сутки туда или обратно, localtime
 
 IZ> или
 IZ> скажем вынуть все месяцы, дни месяца с их именами в многомерный хэш?
 
 Тем более. Устанавливаешь 1 января нужного года, переводишь в unixtime, 
 
 for ($time = $start_time; ; $time += 86400) {
   my @localtime = localtime($time);
   last if $localtime[5] > $current_year;
   $hash{$month[$localtime[4]]}{$localtime[3]} = ...;
 }
 
 Отображение номера месяца в название все равно придется держать свое - на
 локаль тут не очень-то обопрешься, авторы POSIX падежов не знают.
 
 -- 
 Artem Chuprina
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Календарь?   Igor Zinkovsky   28 Jul 2003 03:01:34   Re: Календарь?   Ivan Frolcov   28 Jul 2003 05:38:34   Календарь?   Igor Zinkovsky   30 Jul 2003 02:15:38   Календарь?   Dmitry Diskin   07 Aug 2003 06:40:32   Re: Календарь?   Artem Chuprina   07 Aug 2003 10:35:40   Re: Календарь?   Alexey Mahotkin   03 Aug 2003 23:24:11