1#!/usr/bin/perl -w
2
3BEGIN {
4    if( $ENV{PERL_CORE} ) {
5        chdir 't';
6        @INC = '../lib';
7    }
8}
9
10use Test::More;
11
12BEGIN {
13    if( !$ENV{HARNESS_ACTIVE} && $ENV{PERL_CORE} ) {
14        plan skip_all => "Won't work with t/TEST";
15    }
16}
17
18use strict;
19use Test::Builder;
20
21plan 'no_plan';
22is(Test::Builder->new->has_plan, 'no_plan', 'has no_plan');
23