12345678910111213141516171819 # This test does a basic `use` check on all the code.use Test::More;use File::Find;sub test { -f and /\.pm$/ or return; s{^lib[/\\]}{}; s{\.pm$}{}; s{[/\\]}{::}g; use_ok $_;}find { wanted => \&test, no_chdir => 1,}, 'lib';done_testing;
# This test does a basic `use` check on all the code.
use
Test::More;
File::Find;
sub
test {
-f and /\.pm$/ or
return
;
s{^lib[/\\]}{};
s{\.pm$}{};
s{[/\\]}{::}g;
use_ok
$_
}
find {
wanted
=> \
&test
,
no_chdir
=> 1,
},
'lib'
done_testing;