develooper Front page | perl.perl5.porters | Postings from December 2014

НА: Year-end EBCDIC porting status report

Thread Previous
From:
Yaroslav Kuzmin
Date:
December 31, 2014 09:01
Subject:
НА: Year-end EBCDIC porting status report
Message ID:
0c09d01d5faf441388c08c7c339df0d9@wal-s-mbx2.rocketsoftware.com
Logs available at - https://drive.google.com/file/d/0B5PTttxwo7qAY1U1TTJOTUt1eTg
                              https://drive.google.com/file/d/0B5PTttxwo7qAa2lBcXRXT2VYa00

> 1) t/run/locale.t:  This appears to be some weird interaction with the
> shell.  The data indicates that PerlEnv_getenv("LC_ALL") is getting
> "perlio" when the test environment is testing with perlio, and "stdio"
> when the test environment is stdio.  This is instead of what these
> environment variables are actually getting set to (the string 'invalid')
>   and Perl code inside the run that does
>
>    print STDERR "ENV{LC_ALL}=", $ENV{LC_ALL}
>
> prints
>    ENV{LC_ALL}=invalid
>
> So it appears that retrieving the environment is corrupted.  That's why
> I would like this run manually from a terminal.  My guess is that it
> will work.
>

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib run/locale.t &>log/locale.t.log
RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> cat test_ENV.pl
print STDERR "ENV{LC_ALL}=", $ENV{LC_ALL},"\n";
RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib test_ENV.pl
ENV{LC_ALL}=
RS12 : PDKUZM | ~/ussport/perl/perl-build/t :>

I have a variable LC_ALL is not set, Who sets this variable LC_ALL ?

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> locale
LANG=C
LC_CTYPE="C"
LC_COLLATE="C"
LC_TIME="C"
LC_NUMERIC="C"
LC_MONETARY="C"
LC_MESSAGES="C"
LC_SYNTAX="C"
LC_TOD="C"
LC_ALL=


> 2) t/re/pat_advanced.t  This is now failing one test.  I've broken it
> recently with a "fix" to an unrelated bug.  And I just haven't had a
> chance to look at it, but it should be easy to fix.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib re/pat_advanced.t &>log/pat_advanced.t.log


> 3) t/op/pack.t.  This should again be easy to fix when I get a chance to
> look in real depth.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib op/pack.t &>log/pack.t.log


> 4) t/op/stat.t I've discussed this in other emails.  The OS is returning
> EBADF for a file descriptor that looks right.  I'm hoping that after the
> holidays someone can look at it who has expertise.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib op/stat.t &>log/stat.t.log

http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/rtsta.htm?lang=en

> 5) t/porting/readme.t  This is waiting for me to get around to looking
> at fixing a cpan module it depends on.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib porting/readme.t &>log/readme.t.log

> 6) dist/Data-Dumper/t/dumper.t This is a parse bug.  I now have narrowed
> it down to a single line change in the .t that causes the problem, and
> now have to pore over the debug log.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../dist/Data-Dumper/t/dumper.t &>log/dumper.t.log

> 7) dist/ExtUtils-CBuilder/t/04-base.t  This looks like an lstat()
> problem.  lstat is frequently failing with errno=146=EDC5146I Too many
> levels of symbolic links.  This happens frequently though this is the
> only time it is accompanied by a test failure.  I'm waiting for an
> expert on os390 to look at this.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../dist/ExtUtils-CBuilder/t/04-base.t &>log/04-base.t.log

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA91C0/SPTCS00252
http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/rtlsta.htm?lang=en

> 8) dist/Net-Ping/t/450_service.t  This again looks like an OS
> interaction.  Nothing on this has changed from an earlier status report

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../dist/Net-Ping/t/450_service.t &>log/450_service.t.log

> 9) ext/POSIX/t/sigaction.t  We have a suggestion to use a different
> library to see what happens.  Yaroslav Have you tried that?

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../ext/POSIX/t/sigaction.t &>log/sigaction_xplink.t.log
Segmentation fault
make -qnoxplink
RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../ext/POSIX/t/sigaction.t &>log/sigaction_noxplink.t.log
Illegal instruction

> 10) lib/open.t  I think this will be fixed after a cpan module it uses
> gets fixed.

RS12 : PDKUZM | ~/ussport/perl/perl-build/t :> ../perl -I../lib ../lib/open.t &>log/open.t.log



> On 12/30/2014 12:10 AM, Yaroslav Kuzmin wrote:
>> P.S. I am on vacation from 01.01.2015 to 12.01.2015
>
> Have a good vacation
>
Thanks.

------------------------------------------------------------------------
 Yaroslav Kuzmin
Developer C/C++ ,z/OS , Linux
3 Zhukovskiy Street · Miass, Chelyabinsk region 456318 · Russia
Tel:  +7.922.2.38.33.38
Email: YKuzmin@rocketsoftware.com
Web: www.rocketsoftware.com
================================
Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ +1 800.966.3270 ■ +1 781.577.4321
Unsubscribe From Commercial Email – unsubscribe@rocketsoftware.com
Manage Your Subscription Preferences - http://info.rocketsoftware.com/GlobalSubscriptionManagementEmailFooter_SubscriptionCenter.html
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
================================

This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you.

Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About