1#!/usr/bin/perl -w 2 3# plan() used to export functions by mistake [rt.cpan.org 8385] 4 5BEGIN { 6 if( $ENV{PERL_CORE} ) { 7 chdir 't'; 8 @INC = '../lib'; 9 } 10} 11 12 13use Test::More (); 14Test::More::plan(tests => 1); 15 16Test::More::ok( !__PACKAGE__->can('ok'), 'plan should not export' ); 17