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