my ($passed,$failed) = (0,0);
my @tests = Test::More->builder->details;
for my $test (@tests) {
	if ($test->{ok}) {$passed++} else {$failed++};
}
diag "Of ".(0+@tests)." tests, $passed passed and $failed failed.";