Re: Perl, localtime, и гадость на выходе.

[Daniel Ginsburg <dg@warpsolutions.com>]

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

> gaier@athlon:~ > perl -v 
> This is perl, version 5.005_03 built for i586-linux       
> 
> Подскажите пожалуйста, что я не так делаю.
> 
> Заранее премного благодарен.
> 
> Олег
> 
> 
> --  
> To UNSUBSCRIBE, email to debian-russian-request@lists.debian.org
> with a subject of "unsubscribe". Trouble? Contact listmaster@lists.debian.org
> 

-- 
dg