Help for this page
my @testsubs; ... $testsubs[$_-1]->()==1 ? 'passes' : 'fails', "\n"; }
test 1 passes test 2 passes test 3 fails test 4 passes