xref: /onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/Test/Simple/t/no_header.t (revision 0:68f95e015346) 
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