Subject: perl self tests in 5.6 prereleases
To: None <tech-userlevel@netbsd.org>
From: Erik Bertelsen <erik@mediator.uni-c.dk>
List: tech-userlevel
Date: 02/09/2000 23:23:00
Hello perl gurus,

when installing several recent perl prereleases, latest perl 5.5.640 and 5.5.650,
it fails one subtest in the pragma/warning group:

PROG: 
# pp_hot.c [pp_print]
use warnings 'io' ;
print STDIN "anc";
print <STDOUT>;
print <STDERR>;
open(FOO, ">&STDOUT") and print <FOO>;
print getc(STDERR);
print getc(FOO);
####################################################################
# The next test is known to fail on some systems (Linux/BSD+glibc, #
# NeXT among others.  glibc should be fixed in the next version,   #
# but it appears other platforms have little hope.  We skip it for #
# now (on the grounds that it is "just" a warning).                #
####################################################################
#read(FOO,$_,1);
no warnings 'io' ;
print STDIN "anc";
EXPECTED:
Filehandle main::STDIN opened only for input at - line 3.
Filehandle main::STDOUT opened only for output at - line 4.
Filehandle main::STDERR opened only for output at - line 5.
Filehandle main::FOO opened only for output at - line 6.
Filehandle main::STDERR opened only for output at - line 7.
Filehandle main::FOO opened only for output at - line 8.
GOT:
Filehandle main::STDIN opened only for input at - line 3.
Filehandle main::STDOUT opened only for output at - line 4.
Filehandle main::STDERR opened only for output at - line 5.
Filehandle main::STDERR opened only for output at - line 7.
Failed 2/233 test scripts, 99.14% okay. 2/11245 subtests failed, 99.98% okay.

The problem is that it does issue the warnings related to FOO in the
test script.

Are there any NetBSD stdio and/or perl gurus that are able to tell whether
the expected or the actual test results are correct and -even better- give
the fix ?

best regards
Erik Bertelsen