diff options
author | Tony Cook <tony@develop-help.com> | 2016-06-21 10:02:02 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2016-07-26 15:36:31 +1000 |
commit | cee96d52c39b1e7b36e1c62d38bcd8d86e9a41ab (patch) | |
tree | 8aacc831b1f62ac288475b45f11396f1bbe16442 /cpan/CPAN | |
parent | 1a6796835b1fd6248863ae596147974216e940b8 (diff) | |
download | perl-cee96d52c39b1e7b36e1c62d38bcd8d86e9a41ab.tar.gz |
(perl #127834) remove . from the end of @INC if complex modules are loaded
While currently Encode and Storable are know to attempt to load modules
not included in the core, updates to other modules may lead to those
also attempting to load new modules, so be safe and remove . for those
as well.
Diffstat (limited to 'cpan/CPAN')
-rw-r--r-- | cpan/CPAN/scripts/cpan | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/cpan/CPAN/scripts/cpan b/cpan/CPAN/scripts/cpan index 55550902b1..cceab30e07 100644 --- a/cpan/CPAN/scripts/cpan +++ b/cpan/CPAN/scripts/cpan @@ -1,5 +1,6 @@ #!/usr/local/bin/perl +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use vars qw($VERSION); |