1..5
...
ok 3
...

##</code><code>##

1..5
...
not ok 3
...

##</code><code>##

perl -MTest::Harness -e'runtests @ARGV' test.t