#!perl use Test::More 0.96; subtest "subtest1" => sub { ok 1; ok 2; }; subtest "subtest2" => sub { ok 3; ok 4; ok 5; subtest "subtest3" => sub { ok 6; ok 7; }; }; done_testing;