julianLiuRsch
Programmer
- Oct 4, 2008
- 11
My platform is WinXP, activePerl 5.10.0. Please see the following program
---
use strict;
use Time::Local;
sub main {
my $t1=Time::Local->timelocal(0,0,12,4,9,108);
my $t2=timelocal(0,0,12,4,9,108);
print "t1 is [$t1]\n";
print "t2 is [$t2]\n";
}
&main;
===
The question is : t1 and t2 is different, why?
thanks in advance.
---
use strict;
use Time::Local;
sub main {
my $t1=Time::Local->timelocal(0,0,12,4,9,108);
my $t2=timelocal(0,0,12,4,9,108);
print "t1 is [$t1]\n";
print "t2 is [$t2]\n";
}
&main;
===
The question is : t1 and t2 is different, why?
thanks in advance.