[rt.cpan.org #53902] The coderef in @INC returns a globref for non-existent files

[RSCHUPP via RT]

Fri Jan 22 03:54:39 2010: Request 53902 was acted upon.
Transaction: Correspondence added by RSCHUPP
       Queue: PAR-Packer
     Subject: The coderef in @INC returns a globref for non-existent files
   Broken in: 1.002
    Severity: Normal
       Owner: Nobody
  Requestors: sw...@cpan.org
      Status: new
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=53902 >


On Thu Jan 21 22:12:49 2010, SWMCD wrote:

> However the coderef installed by pp always returns a filehandle
> (actually, a globref), even if the require'd file doesn't exist.

Can you give a specific example? 
A simple-minded test doesn't show this behaviour:

$ pp -o foo.exe -e 'use Data::Dumper; print "INC = @INC\n"; 
   for (@INC) { 
     next unless ref $_ eq "CODE"; 
     my $required = $_->($_, "Fooish/Bar.pm"); 
     print "$_ => ", Dumper($required); 
   }'
$ ./foo.exe
INC =
/tmp/par-ccm_root/cache-155b9fe3b8219d39ccea2b862961b810cd5fab2d/inc/lib
/tmp/par-ccm_root/cache-155b9fe3b8219d39ccea2b862961b810cd5fab2d/inc
CODE(0xf13b50) CODE(0xf13e50)
CODE(0xf13b50) => $VAR1 = undef;
CODE(0xf13e50) => $VAR1 = undef;