Using our Custom Test

use strict;
use Test::More tests => 3;
use Test::Foo;
foo_ok('foo');
foo_ok('bar');
foo_ok('baz', 'test baz');

1..3
ok 1 - test if 'foo' eq 'foo'
not ok 2 - test if 'bar' eq 'foo'
#     Failed test (foo.t at line 5)
# 'bar' does not equal 'foo'
not ok 3 - test baz
#     Failed test (foo.t at line 6)
# 'baz' does not equal 'foo'
# Looks like you failed 2 tests of 3.