require-nul.pl

gistfile1.txt

require-nul.pl:
#!perl

my $plugin = "Test::More\0Evil::Package";
{ 
  no strict 'refs';
  @{$plugin."::ISA"} = ('Test::More');
}

package main;
eval "require $plugin;" and print q(found);
warn $@ if $@;
print "$_\n" for keys %{"Test::"};
print "$_\n" for keys %{"Test::More\0Evil::"};
print "$_\n" for keys %INC;
---
$ perl5.10.1d-nt require-nul.pl
syntax error at (eval 1) line 1, at EOF
More::
MoreEvil::
Package::
strict.pm

$ perl5.14.2d-nt require-nul.pl
syntax error at (eval 1) line 1, at EOF
More::
MoreEvil::
Package::
strict.pm

$ perl5.16.0d require-nul.pl
syntax error at (eval 1) line 1, at EOF
More::
MoreEvil::
Package::
strict.pm

old (require "Test::More\0Evil::Package"):
./perl -Ilib require-nul.pl
Can't locate Test::More in @INC (@INC contains: lib /usr/local/lib/perl5/site_perl/5.17.3/x86_64-linux /usr/local/lib/perl5/site_perl/5.17.3 /usr/local/lib/perl5/5.17.3/x86_64-linux /usr/local/lib/perl5/5.17.3 /usr/local/lib/perl5/site_perl .) at require-nul.pl line 9.