|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Pavel Letskiy 2:5020/400 19 Jun 2003 10:07:47 To : All Subject : strftime -------------------------------------------------------------------------------- Да пребудет с нами Великая Сила! Вопрос наверне совсем тупой, но что-то никак не найти решение. Имеется простенький скрипт выводящий дату в определенном формате: use POSIX qw(strftime); sub curdate{ print strftime "%Y%m%d", localtime; } $curdate = &curdate; print $curdate; Так вот он отрабатывает нормально, если бы не одног HО - выводится дата, и в конце ставится "1". Откуда она там берется и как ее убрать - непонятно. Заранее спасибо за помощь. -- Павел "Che" Лецкий ======================= Registered Linux User #305735 FIDOnet 2:5030/1505.2 mailto: che@deepapple.com --- ifmail v.2.15dev5 * Origin: Sovintel (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/775604d79042.html, оценка из 5, голосов 10
|