BEGIN {
if( $ENV{PERL_CORE} ) {
chdir 't';
@INC = '../lib';
}
}
print "1..1\n";
unless (eval 'require Test::Harness') {
print "not ok 1\n";
} else {
print "ok 1\n";
}