1if ( $ENV{PERL_CORE} && !$ENV{HARNESS_ACTIVE} ) {
2    print "1..0 # Skip: t/TEST needs numbers\n";
3    exit;
4}
5
6print <<END;
71..6
8ok
9ok
10ok
11ok
12ok
13ok
14END
15