Skip Menu |

This queue is for tickets about the Test-Harness CPAN distribution.

Report information
The Basics
Id: 22064
Status: resolved
Priority: 0/
Queue: Test-Harness

People
Owner: Nobody in particular
Requestors: djerius [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 2.64
Fixed in: (no value)



Subject: Test::Harness::Straps::_default_inc cache is broken
The cache code in Test::Harness::Straps::_default_inc is broken. The do block does not return @inc, but the number of haracters chomped from @inc: $cache{$perl} ||= [do { local $ENV{PERL5LIB}; my @inc =`$perl -le "print join qq[\\n], \@INC"`; chomp @inc; }]; It should look like this: $cache{$perl} ||= [do { local $ENV{PERL5LIB}; my @inc =`$perl -le "print join qq[\\n], \@INC"`; chomp @inc; return @inc; }];
Fixed in 2.65_02.