use Test::More tests => 1;
INIT { $child = fork }
ok( 1 );

##</code><code>##

make test

t/02init.....ok 2/1Don't know which tests failed: got 2 ok, expected 1