On Wed, Jan 03, 2001 at 09:19:12PM +0100, Oleg Gaier wrote: > Привет всем. :) > > Тут возникла у меня маленькая проблема. > Вот пишу такой вот скрипт: > > #!/usr/bin/perl > > ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time()); > print "Sec =\t$sec\n"; > print "Min =\t$min\n"; > print "hour =\t$hour\n"; > print "mday =\t$mday\n"; > print "mon =\t$mon\n"; > print "year =\t$year\n"; > print "wday =\t$wday\n"; > print "yday =\t$yday\n"; > print "isdst =\t$isdst\n"; > > И получаю на выходе такую гадость: > > Sec = 9 > Min = 13 > hour = 21 > mday = 3 > mon = 0 # Вот в этих строчках проблема. :( > year = 101 # Сделано это было только что. > wday = 3 > yday = 2 # > isdst = 0 >
Таки что Вас смущает? perldoc -f localtime > [EMAIL PROTECTED]:~ > perl -v > This is perl, version 5.005_03 built for i586-linux > > Подскажите пожалуйста, что я не так делаю. > > Заранее премного благодарен. > > Олег > > > -- > To UNSUBSCRIBE, email to [EMAIL PROTECTED] > with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED] > -- dg