The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use Test;

BEGIN {
    plan(tests => 2,
         todo => [],
         onfail => sub {},
        );
}

use Math::Simple qw(add subtract);

ok(add(5, 7) == 12);
ok(subtract(5, 7) == -2);