Поздравляю )) while (1) { if ( "17-10" eq join "-", @{ [ localtime(time) ] }[ 3, 4 ] ) { print "С Днём Рождения!\n"; } sleep 24 * 3600; } ----------- следущая часть ----------- Вложение в формате HTML было извлечено… URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20111117/a5dc6000/attachment.html>