BEGIN {
if ($ENV{PERL_CORE}) {
chdir('t') if -d 't';
@INC = qw(lib/Filter/Simple ../lib);
}
}
BEGIN { print "1..4\n" }
use ImportTest (1..3);
say "not ok 4\n";
BEGIN {
if ($ENV{PERL_CORE}) {
chdir('t') if -d 't';
@INC = qw(lib/Filter/Simple ../lib);
}
}
BEGIN { print "1..4\n" }
use ImportTest (1..3);
say "not ok 4\n";