Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm List-Subscribe: List-Archive: List-Post: List-Help: , Sender: cygwin-owner AT cygwin DOT com Mail-Followup-To: cygwin AT cygwin DOT com Delivered-To: mailing list cygwin AT cygwin DOT com Date: Sun, 17 Jul 2005 16:15:25 -0700 From: Michael G Schwern To: "Gerrit P. Haase" Cc: Andrew Ho , cygwin AT cygwin DOT com, makemaker AT perl DOT org, perl5-porters AT perl DOT org, petdance AT cpan DOT 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 DOT 60802 AT familiehaase DOT de> <20050717195041 DOT GC5605 AT windhund DOT schwern DOT org> <42DABCA8 DOT 2020603 AT familiehaase DOT de> <20050717211809 DOT GB6411 AT windhund DOT schwern DOT org> <42DAD10B DOT 4080807 AT familiehaase DOT de> <20050717215802 DOT GA6714 AT windhund DOT schwern DOT org> <42DADB53 DOT 1060006 AT familiehaase DOT de> <20050717224140 DOT GA6896 AT windhund DOT schwern DOT org> <42DAE3A9 DOT 10308 AT familiehaase DOT 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 AT pobox DOT 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/