X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/17f410f9a3a4ae9cda502b59b391e6653db436ce..0e06870bf080a38cda51c06c6612359afc2334e1:/lib/ExtUtils/Installed.pm

diff --git a/lib/ExtUtils/Installed.pm b/lib/ExtUtils/Installed.pm
index da4a653..6961c6f 100644
--- a/lib/ExtUtils/Installed.pm
+++ b/lib/ExtUtils/Installed.pm
@@ -67,8 +67,8 @@ my $sub = sub
 
    # Hack of the leading bits of the paths & convert to a module name
    my $module = $File::Find::name;
-   $module =~ s!$Config{archlib}/auto/(.*)/.packlist!$1!;
-   $module =~ s!$Config{sitearch}/auto/(.*)/.packlist!$1!;
+   $module =~ s!$Config{archlib}/auto/(.*)/.packlist!$1!s;
+   $module =~ s!$Config{sitearch}/auto/(.*)/.packlist!$1!s;
    my $modfile = "$module.pm";
    $module =~ s!/!::!g;