Исходное сообщение
"Как в Perl проверить текущую дату на условие 'последняя пятн..." Отправлено alexvs, 23-Фев-07 14:29
>>Как в Perl проверить текущую дату на условие "последняя пятница июля"? >perl -e ' >  if( >    ((localtime())[2] == 5) and >    ((localtime())[4] == 6) and >    ((localtime(time()+60*60*24*7))[4] != (localtime())[4]) >   ) > { print "Today is last Friday\n"; } ' Очепятка, правильно так: >perl -e '   if(     ((localtime())[6] == 5) and     ((localtime())[4] == 6) and     ((localtime(time()+60*60*24*7))[4] != (localtime())[4])    ) { print "Today is last Friday\n"; } '

Ваше сообщение
Имя*:
EMail:	Для отправки новых сообщений в текущей нити на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:
	Введите код, изображенный на картинке: