1BEGIN { 2 if( $ENV{PERL_CORE} ) { 3 chdir 't'; 4 @INC = '../lib'; 5 } 6} 7 8use Test::Builder; 9 10# STDOUT must be unbuffered else our prints might come out after 11# Test::More's. 12$| = 1; 13 14BEGIN { 15 Test::Builder->new->no_header(1); 16} 17 18use Test::More tests => 1; 19 20print "1..1\n"; 21pass; 22