Test::Simple/More/Builder/Tutorial 0.41

[perl5.git] / lib / Test / Simple / t / plan_no_plan.t

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');