At Mon, 25 Mar 2002 14:37:05 -0800 (PST),
Doug MacEachern wrote:

> > not ok 11
> 
> seems to be related to Time::ParseDate, what version are you using?
> 
> % perl-5.005_03-debug -MTime::ParseDate -le 'print $Time::ParseDate::VERSION'
> 101.062101

slightly modified debugging output (localtime => gmtime) and tested again:

  my $date_str = "Sat, 18 Jul 1998 08:38:00 -0700";

  if($test_time_parsedate) {
      my $c = Apache::Util::parsedate($date_str);
      print "C says: ", scalar(gmtime $c), " = $c\n";

      my $p = Time::ParseDate::parsedate($date_str);
      print "Perl says: ", scalar(gmtime $p), " = $p\n";

C says: Sat Jul 18 08:38:00 1998 = 900751080
Perl says: Sat Jul 18 15:38:00 1998 = 900776280
HTT=Sat, 18 July 1998
not ok 11


It seems to me that Apache::Util::parsedate() ignores '-0700'.

-- 
Tatsuhiko Miyagawa <[EMAIL PROTECTED]>

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to