6 use lib "$FindBin::Bin/lib";
8 use Test::Requires { 'Sub::Exporter' => '0' };
11 use SubExporterCompatibility qw(MyStr something);
13 ok MyStr->check('aaa'), "Correctly passed";
14 ok !MyStr->check([1]), "Correctly fails";
15 ok something(), "Found the something method";