From tchrist@jhereg.perl.com

[Please enter your report here]

IS this of some concern? I see the glibc disclaimer, but wonder
whether there's more wrong than that.

Here's the short story​:

io/dup.t 0 11 7 6 85.71% 2-7
lib/getopt.t 0 11 ?? ?? % ??
lib/io_dup.t 0 11 6 5 83.33% 2-6
lib/io_xs.t 0 11 ?? ?? % ??
pragma/strict.t 77 2 2.60% 66-67
pragma/warning. 291 15 5.15% 70-75, 100, 190-191, 196, 203,
  206, 208-209, 211

And here's the long one​:

% cd /usr/src/perl5.005_61
% ./perl -Ilib utils/perlbug -nok &

(which is what's running now)

% cd t
% ./perl harness
base/rs.............ok, 4/14 skipped​: on non-VMS system
io/dup..............dubious
  Test returned status 0 (wstat 11, 0xb)
DIED. FAILED tests 2-7
  Failed 6/7 tests, 14.29% okay
op/64bit............skipped test on this platform
op/lfs..............skipped test on this platform
op/magic............ok, 4/35 skipped​: unknown reason
op/regexp...........ok, 3/741 skipped​: unknown reason
op/regexp_noamp.....ok, 7/741 skipped​: unknown reason
op/taint............ok, 6/149 skipped​: various reasons
pragma/strict.......ok 65/77PROG​:
use strict 'vars' ;
require "./abc";
EXPECTED​:

GOT​:
Use of EQ is deprecated at ./abc line 2.
pragma/strict.......NOK 66PROG​:
require "./abc";
$joe = 1 ;
EXPECTED​:

GOT​:
Can't locate ./abc at - line 1.
pragma/strict.......ok 77/77FAILED tests 66-67
  Failed 2/77 tests, 97.40% okay
pragma/warning......ok 69/291PROG​: -W

# lint​: check compile time $^W is zapped
BEGIN { $^W = 0 ;}
$a = $b = 1 ;
$a = 1 if $a EQ $b ;
close STDIN ; print STDIN "abc" ;
EXPECTED​:
Use of EQ is deprecated at - line 5.
print on closed filehandle main​::STDIN at - line 6.
GOT​:
Use of EQ is deprecated at - line 5.
pragma/warning......NOK 70PROG​: -W

# lint​: check runtime $^W is zapped
$^W = 0 ;
close STDIN ; print STDIN "abc" ;
EXPECTED​:
print on closed filehandle main​::STDIN at - line 4.
GOT​:

pragma/warning......NOK 71PROG​: -W

# lint​: check runtime $^W is zapped
{
  $^W = 0 ;
  close STDIN ; print STDIN "abc" ;
}
EXPECTED​:
print on closed filehandle main​::STDIN at - line 5.
GOT​:

pragma/warning......NOK 72PROG​: -W

# lint​: check "no warning" is zapped
no warning ;
$a = $b = 1 ;
$a = 1 if $a EQ $b ;
close STDIN ; print STDIN "abc" ;
EXPECTED​:
Use of EQ is deprecated at - line 5.
print on closed filehandle main​::STDIN at - line 6.
GOT​:
Use of EQ is deprecated at - line 5.
pragma/warning......NOK 73PROG​: -W

# lint​: check "no warning" is zapped
{
  no warning ;
  close STDIN ; print STDIN "abc" ;
}
EXPECTED​:
print on closed filehandle main​::STDIN at - line 5.
GOT​:

pragma/warning......NOK 74PROG​: -Ww

# lint​: check combination of -w and -W
{
  $^W = 0 ;
  close STDIN ; print STDIN "abc" ;
}
EXPECTED​:
print on closed filehandle main​::STDIN at - line 5.
GOT​:

pragma/warning......ok 99/291PROG​:
# doio.c
use warning 'io' ;
close STDIN ;
tell(STDIN);
$a = seek(STDIN,1,1);
$a = sysseek(STDIN,1,1);
-x STDIN ;
no warning 'io' ;
close STDIN ;
tell(STDIN);
$a = seek(STDIN,1,1);
$a = sysseek(STDIN,1,1);
-x STDIN ;
EXPECTED​:
tell() on unopened file at - line 4.
seek() on unopened file at - line 5.
sysseek() on unopened file at - line 6.
Stat on unopened file <STDIN> at - line 7.
GOT​:

pragma/warning......ok 189/291PROG​:
# pp_hot.c
use warning 'io' ;
print STDIN "anc";
print <STDOUT>;
print <STDERR>;
open(FOO, ">&STDOUT") and print <FOO>;
print getc(STDERR);
print getc(FOO);
read(FOO,$_,1);
no warning 'io' ;
print STDIN "anc";
####################################################################
# N O T E #
# This test is known to fail on Linux and *BSD systems with glibc. #
# The glibc development team is aware of the problem, and has #
# determined a fix for the next release of that library. #
####################################################################
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.
Filehandle main​::FOO opened only for output at - line 9.
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​::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.
pragma/warning......NOK 190PROG​:
# pp_hot.c
use warning 'closed' ;
close STDIN ;
print STDIN "anc";
no warning 'closed' ;
print STDIN "anc";
EXPECTED​:
print on closed filehandle main​::STDIN at - line 4.
GOT​:

pragma/warning......ok 195/291PROG​:
# pp_hot.c
use warning 'closed' ;
close STDIN ; $a = <STDIN> ;
no warning 'closed' ;
$a = <STDIN> ;
EXPECTED​:
Read on closed filehandle main​::STDIN at - line 3.
GOT​:

pragma/warning......ok 202/291PROG​:
# pp_sys.c
use warning 'closed' ;
format STDIN =