diff options
| -rwxr-xr-x | misc/perlcore | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/misc/perlcore b/misc/perlcore index 633bf43..b9c1b80 100755 --- a/misc/perlcore +++ b/misc/perlcore @@ -160,6 +160,7 @@ sub findmods my @modfiles; my $finder = sub { return unless(/[.]pm\z/); + return if m{\Q$libdir\E[^/]+/t/}; # ignore testing modules push @modfiles, $_; }; findfile({ 'no_chdir' => 1, 'wanted' => $finder }, $libdir); |