use Test::More tests => 3; ok 1, 'Happy'; ok 1, 'Cheerful'; #### sub is_expected_test_result { my $test_result = shift; return $test_result->{ok} && ! is_unexpected_todo_success( $test_result ) && ! diagnostics( $_ ); }