The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use lib 't/lib';

# Simple - test that Test::More and Test::Warn can be combined

use MyTest::Simple;

ok(1, "ok() exists");

pass("pass() exists");

warning_like(
    sub { warn("foo") },
    qr/foo/,
    "warning_like() exists"
);

done_testing();