Path : /proc/3/task/3/cwd/usr/share/doc/perl-Test-Simple-0.98/t/Builder/ |
Current File : //proc/3/task/3/cwd/usr/share/doc/perl-Test-Simple-0.98/t/Builder/no_ending.t |
use Test::Builder; BEGIN { if( $ENV{PERL_CORE} ) { chdir 't'; @INC = '../lib'; } } BEGIN { my $t = Test::Builder->new; $t->no_ending(1); } use Test::More tests => 3; # Normally, Test::More would yell that we ran too few tests, but we # suppressed the ending diagnostics. pass; print "ok 2\n"; print "ok 3\n";