Mailing-List: contact cygwin-help@cygwin.com; run by ezmlm List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cygwin-owner@cygwin.com Mail-Followup-To: cygwin@cygwin.com Delivered-To: mailing list cygwin@cygwin.com Date: Sun, 17 Jul 2005 16:15:25 -0700 From: Michael G Schwern To: "Gerrit P. Haase" Cc: Andrew Ho , cygwin@cygwin.com, makemaker@perl.org, perl5-porters@perl.org, petdance@cpan.org Subject: Re: [perl-5.8.7] Perl regression tests fail when lib directory is present Message-ID: <20050717231525.GB7077@windhund.schwern.org> References: <42DA398D.60802@familiehaase.de> <20050717195041.GC5605@windhund.schwern.org> <42DABCA8.2020603@familiehaase.de> <20050717211809.GB6411@windhund.schwern.org> <42DAD10B.4080807@familiehaase.de> <20050717215802.GA6714@windhund.schwern.org> <42DADB53.1060006@familiehaase.de> <20050717224140.GA6896@windhund.schwern.org> <42DAE3A9.10308@familiehaase.de> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <42DAE3A9.10308@familiehaase.de> User-Agent: Mutt/1.4.2.1i On Mon, Jul 18, 2005 at 01:03:05AM +0200, Gerrit P. Haase wrote: > >At this point I'd suspect there's something broken about %ENV. Try > >replacing > >this in THS->analyze_file: > > > > local $ENV{PERL5LIB} = $self->_INC2PERL5LIB; > > if ( $Test::Harness::Debug ) { > > local $^W=0; # ignore undef warnings > > print "# PERL5LIB=$ENV{PERL5LIB}\n"; > > } > > > >with this: > > > > my $libs = $self->_INC2PERL5LIB; > > local $ENV{PERL5LIB} = $libs; > > if ( $Test::Harness::Debug ) { > > local $^W=0; # ignore undef warnings > > print STDERR "# PERL5LIB=$ENV{PERL5LIB}\n"; > > print STDERR "# libs=$libs\n"; > > } > > > >to determine if _INC2PERL5LIB() is acting properly. > > > $ perl -MTest::Harness -Iblib/lib -Iblib/arch -wle > '$Test::Harness::Debug = 1; $Test::Harness::Verbose = 1; runtests > @ARGV' t/*.t > t/test0....# Running: /usr/bin/perl -w t/test0.t > # PERL5LIB=blib/lib:blib/arch > # libs=blib/lib:blib/arch > 1..1 > # Running under perl version 5.008007 for cygwin > # Current time local: Mon Jul 18 00:59:23 2005 > # Current time GMT: Sun Jul 17 22:59:23 2005 > # Using Test.pm version 1.25 > ok 1 > ok > t/test1....# Running: /usr/bin/perl -w t/test1.t > # PERL5LIB= > # libs= Now that's just weird. I think at this point you're going to have to go in and poke around with the debugger. -- Michael G Schwern schwern@pobox.com http://www.pobox.com/~schwern Reality is that which, when you stop believing in it, doesn't go away. -- Phillip K. Dick -- 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/