pkgsrc-Users archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

$ENV{'TZ'} is not respected on localtime with perl-5.22.1 (Re: make test



I'm concerned perl (5.22.1) fails make test on 5 items.

Among below,
(2) is just a issue on modifed file one with REPLACE_PERL and by
    patch, and expected HASH'es are not updated.

Strange thing is (1). Please execute attached file on various
environment. Old perls seems OK, but at least 5.22.1 shows
all the same numbers indicating $ENV{'TZ'} is not respected on
localtime function.

(1)
t/op/time ..................................................... # Failed test 7 - changes to $ENV{TZ} respected at op/time.t line 62
FAILED at test 7

(2)
t/porting/customized .......................................... # Failed test 26 - SHA for cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm matches stashed SHA at porting/customized.t line 105
#      got "5891f833c74b7afff1df76b003f9e8f2e92b7696"
# expected "8cef99a9bd370ecfd07ddb0efbdcbb4101255e45"
# Failed test 48 - SHA for cpan/version/lib/version.pm matches stashed SHA at porting/customized.t line 105
#      got "e27f5037ae7e95be512dbee795dfc56e7e4f7a08"

(3)
t/porting/regen ............................................... # Failed test 1 - generated regcharclass.h is up to date at porting/regen.t line 85
#      got "lib/unicore/mktables"
# expected ""
# Failed test 4 - generated charclass_invlists.h is up to date at porting/regen.t line 85
#      got "lib/unicore/mktables"


(4)
ext/POSIX/t/wrappers .......................................... #   Failed test 'sleep'
#   at t/wrappers.t line 132.


(5)
lib/locale .................................................... FAILED at test 400

-------------------
#! /usr/pkg/bin/perl
my $beg = time();

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($beg);

# check that localtime respects changes to $ENV{TZ}

$ENV{'TZ'} = 'GMT+5';
($sec,$min,$hour2,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($beg);

$ENV{'TZ'} = 'GMT-5';
($sec,$min,$hour3,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($beg);

$ENV{TZ} = 'GMT-5';
($sec,$min,$hour4,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($beg);

print $hour,"\n";
print $hour2,"\n";
print $hour3,"\n";
print $hour4,"\n";

---
mef%NetBSD.org@localhost
Makoto Fujiwara, 
Chiba, Japan, Narita Airport and Disneyland prefecture.


Home | Main Index | Thread Index | Old Index