1234567891011 #!/usr/bin/perl -wuse strict;use Test::Builder;my $tb = Test::Builder->new;$tb->plan( "no_plan" );$tb->ok(1);$tb->ok(1);$tb->done_testing(2);
#!/usr/bin/perl -w
use
strict;
Test::Builder;
my
$tb
= Test::Builder->new;
->plan(
"no_plan"
);
->ok(1);
->done_testing(2);