[perl-5.8.7] Perl regression tests fail when lib directory is present

Gerrit P. Haase gerrit@familiehaase.de
Sun Jul 17 22:27:00 GMT 2005


Michael G Schwern wrote:

> On Sun, Jul 17, 2005 at 11:43:39PM +0200, Gerrit P. Haase wrote:
> 
>>Nope, Teat::Harness now at version 2.52:
>>
>>$ make test
>>/usr/bin/perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0, 
>>'blib/lib', 'blib/arch')" t/*.t
> 
> 
> Ok, see if MakeMaker has anything to do with this by running:
> 
> perl -MTest::Harness -Iblib/lib -Iblib/arch -wle 'runtests @ARGV' t/*.t
> 
> If it still fails then we know MakeMaker is not involved.  I don't think
> it is.

$ perl -MTest::Harness -Iblib/lib -Iblib/arch -wle 'runtests @ARGV'
[...]
Failed Test Stat Wstat Total Fail  Failed  List of Failed
-----------------------------------------------------------------------------------------------------
t/test1.t      2   512    ??   ??       %  ??
t/test3.t      2   512    ??   ??       %  ??
t/test5.t      2   512    ??   ??       %  ??
Failed 3/6 test scripts, 50.00% okay. 0/3 subtests failed, 100.00% okay.


> Then try:
> 
> perl -MTest::Harness -Iblib/lib -Iblib/arch -wle '$Test::Harness::Debug = 1;  $Test::Harness::Verbose = 1;  runtests @ARGV' t/*.t
> The lines we're looking for are "# PERL5LIB=..." from THS->analyze_file()
> telling us how TH is setting @INC.

t/test0....# Running: /usr/bin/perl -w t/test0.t
# PERL5LIB=blib/lib:blib/arch
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:14:08 2005
# Current time GMT:   Sun Jul 17 22:14:08 2005
# Using Test.pm version 1.25
ok 1
ok
t/test1....# Running: /usr/bin/perl -w t/test1.t
# PERL5LIB=
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 /usr/l 
 
ib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5 
 
/vendor_perl/5.8/cygwin /usr/lib/perl5/vendor_perl/5.8 
/usr/lib/perl5/vendor_perl/5.8 .) at t/test1.t 
                                                      line 2.
BEGIN failed--compilation aborted at t/test1.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
t/test2....# Running: /usr/bin/perl -w t/test2.t
# PERL5LIB=blib/lib:blib/arch
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:14:09 2005
# Current time GMT:   Sun Jul 17 22:14:09 2005
# Using Test.pm version 1.25
ok 1
ok
t/test3....# Running: /usr/bin/perl -w t/test3.t
# PERL5LIB=
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 /usr/l 
 
ib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5 
 
/vendor_perl/5.8/cygwin /usr/lib/perl5/vendor_perl/5.8 
/usr/lib/perl5/vendor_perl/5.8 .) at t/test3.t 
                                                      line 2.
BEGIN failed--compilation aborted at t/test3.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
t/test4....# Running: /usr/bin/perl -w t/test4.t
# PERL5LIB=blib/lib:blib/arch
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:14:10 2005
# Current time GMT:   Sun Jul 17 22:14:10 2005
# Using Test.pm version 1.25
ok 1
ok
t/test5....# Running: /usr/bin/perl -w t/test5.t
# PERL5LIB=
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 /usr/l 
 
ib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5 
 
/vendor_perl/5.8/cygwin /usr/lib/perl5/vendor_perl/5.8 
/usr/lib/perl5/vendor_perl/5.8 .) at t/test5.t 
                                                      line 2.
BEGIN failed--compilation aborted at t/test5.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
Failed Test Stat Wstat Total Fail  Failed  List of Failed
-----------------------------------------------------------------------------------------------------
t/test1.t      2   512    ??   ??       %  ??
t/test3.t      2   512    ??   ??       %  ??
t/test5.t      2   512    ??   ??       %  ??
Failed 3/6 test scripts, 50.00% okay. 0/3 subtests failed, 100.00% okay.

> You'll probably also want to look at the output of THS->_command_line().
> Unfortunately there's not a $Debug print for that so you should put one in.

$ perl -MTest::Harness -Iblib/lib -Iblib/arch -wle 
'$Test::Harness::Debug = 1;  $Test::Harness::Verbose = 1;  runtests 
@ARGV' t/*.t
t/test0....# _command_line: /usr/bin/perl -w t/test0.t
# Running: /usr/bin/perl -w t/test0.t
# PERL5LIB=blib/lib:blib/arch
# _command_line: /usr/bin/perl -w t/test0.t
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:26:34 2005
# Current time GMT:   Sun Jul 17 22:26:34 2005
# Using Test.pm version 1.25
ok 1
ok
t/test1....# _command_line: /usr/bin/perl -w t/test1.t
# Running: /usr/bin/perl -w t/test1.t
# PERL5LIB=
# _command_line: /usr/bin/perl -w t/test1.t
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 
/usr/lib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5/vendor_perl/5.8/cygwin 
/usr/lib/perl5/vendor_perl/5.8 /usr/lib/perl5/vendor_perl/5.8 .) at 
t/test1.t line 2.
BEGIN failed--compilation aborted at t/test1.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
t/test2....# _command_line: /usr/bin/perl -w t/test2.t
# Running: /usr/bin/perl -w t/test2.t
# PERL5LIB=blib/lib:blib/arch
# _command_line: /usr/bin/perl -w t/test2.t
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:26:35 2005
# Current time GMT:   Sun Jul 17 22:26:35 2005
# Using Test.pm version 1.25
ok 1
ok
t/test3....# _command_line: /usr/bin/perl -w t/test3.t
# Running: /usr/bin/perl -w t/test3.t
# PERL5LIB=
# _command_line: /usr/bin/perl -w t/test3.t
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 
/usr/lib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5/vendor_perl/5.8/cygwin 
/usr/lib/perl5/vendor_perl/5.8 /usr/lib/perl5/vendor_perl/5.8 .) at 
t/test3.t line 2.
BEGIN failed--compilation aborted at t/test3.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
t/test4....# _command_line: /usr/bin/perl -w t/test4.t
# Running: /usr/bin/perl -w t/test4.t
# PERL5LIB=blib/lib:blib/arch
# _command_line: /usr/bin/perl -w t/test4.t
1..1
# Running under perl version 5.008007 for cygwin
# Current time local: Mon Jul 18 00:26:36 2005
# Current time GMT:   Sun Jul 17 22:26:36 2005
# Using Test.pm version 1.25
ok 1
ok
t/test5....# _command_line: /usr/bin/perl -w t/test5.t
# Running: /usr/bin/perl -w t/test5.t
# PERL5LIB=
# _command_line: /usr/bin/perl -w t/test5.t
Can't locate TestModule.pm in @INC (@INC contains: 
/usr/lib/perl5/5.8/cygwin /usr/lib/perl5/5.8 
/usr/lib/perl5/site_perl/5.8/cygwin /usr/lib/perl5/site_perl/5.8 
/usr/lib/perl5/site_perl/5.8 /usr/lib/perl5/vendor_perl/5.8/cygwin 
/usr/lib/perl5/vendor_perl/5.8 /usr/lib/perl5/vendor_perl/5.8 .) at 
t/test5.t line 2.
BEGIN failed--compilation aborted at t/test5.t line 2.
dubious
         Test returned status 2 (wstat 512, 0x200)
Failed Test Stat Wstat Total Fail  Failed  List of Failed
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
t/test1.t      2   512    ??   ??       %  ??
t/test3.t      2   512    ??   ??       %  ??
t/test5.t      2   512    ??   ??       %  ??
Failed 3/6 test scripts, 50.00% okay. 0/3 subtests failed, 100.00% okay.


> Do any of these tests have -T in the #! line?

No, all the same files, interesting thing is that only every second
time it fails, every other test succeeds:

$ for i in `ls t`; do cat t/$i ; done
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);
use Test;
use TestModule;

BEGIN { plan tests => 1 }

ok(1);


Funny ;)


Gerrit
-- 
=^..^=

--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Problem reports:       http://cygwin.com/problems.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/



More information about the Cygwin mailing list