BEGIN { if( $ENV{PERL_CORE} ) { chdir 't'; @INC = '../lib'; } } use Test::More; BEGIN { if( !$ENV{HARNESS_ACTIVE} && $ENV{PERL_CORE} ) { plan skip_all => "Won't work with t/TEST"; } } BEGIN { require Test::Harness; } if( $Test::Harness::VERSION < 1.20 ) { plan skip_all => 'Need Test::Harness 1.20 or up'; } else { plan 'no_plan'; } pass('Just testing'); ok(1, 'Testing again');