A drop-in replacement of Test::Simple.

examples/perl/t/31.t
use strict;
use warnings;

use lib 'lib';
use MyTools;

use Test::More tests => 3;
# Test::More instead of Test::Simple
#
ok( sum(1, 1)    == 2,  '1+1');
ok( sum(2, 2)    == 4,  '2+2');
ok( sum(2, 2, 2) == 6,  '2+2+2');

Output:

1..3
ok 1 - 1+1
ok 2 - 2+2
not ok 3 - 2+2+2
#   Failed test '2+2+2'
#   at t/31.t line 12.
# Looks like you failed 1 test of 3.