Test::Tester::CaptureRunner 0.103

Test::Tester::CaptureRunner is a Perl module that provides help testing test modules built with Test::Builder.

SYNOPSIS

use Test::Tester tests => 6;

use Test::MyStyle;

check_test(
sub {
is_mystyle_eq("this", "that", "not eq");
},
{
ok => 0, # expect this to fail
name => "not eq",
diag => "Expected: thisnGot: that",
}
);

or

use Test::Tester;

use Test::More tests => 3;
use Test::MyStyle;

my @results = run_tests(
sub {
is_database_alive("dbname");
},
{
ok => 1, # expect the test to pass
}
);

# now use Test::More::like to check the diagnostic output

like($result[1]->{diag}, "/^Database ping took d+ seconds$"/, "diag");