Need to split $ENV{PERL5LIB} on path separator

xaicron · Mar 4, 2021 · f9306c5 · f9306c5
1 parent 6134528
commit f9306c5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/App/pmuninstall.pm b/lib/App/pmuninstall.pm
@@ -347,7 +347,7 @@ sub build_active_perl5lib {
     my $perl5libs = [
         $self->install_base_arch_path($path),
         $self->install_base_perl_path($path),
-        $interpolate && $ENV{PERL5LIB} ? $ENV{PERL5LIB} : (),
+        $interpolate && $ENV{PERL5LIB} ? split(/\Q$Config{path_sep}\E/, $ENV{PERL5LIB}) : (),
     ];
     return $perl5libs;
 }