12345678910111213141516171819 # This test does a basic `use` check on all the code.use Test::More;use File::Find;sub test { s{^lib/(.*)\.pm$}{$1} or return; s{/}{::}g; use_ok $_;}$ENV{PERL_ZILD_TEST_000_COMPILE_MODULES} = 1;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 {
s{^lib/(.*)\.pm$}{$1} or
return
;
s{/}{::}g;
use_ok
$_
}
$ENV
{PERL_ZILD_TEST_000_COMPILE_MODULES} = 1;
find {
wanted
=> \
&test
,
no_chdir
=> 1,
},
'lib'
done_testing;