In perl.git, the branch maint-5.22 has been updated <http://perl5.git.perl.org/perl.git/commitdiff/afe4e8012bc2950a810d822e442d32c328ed05c3?hp=33b02cf6bcd882d7d36c7a9372bc3e3b376541ba>
- Log ----------------------------------------------------------------- commit afe4e8012bc2950a810d822e442d32c328ed05c3 Author: Steve Hay <[email protected]> Date: Mon Jul 25 12:36:27 2016 +0100 Bump to RC2 M META.json M patchlevel.h commit 5dcaad8d18ed2a57e637c41ddafe4d6bbf98098f Author: Steve Hay <[email protected]> Date: Mon Jul 25 11:26:07 2016 +0100 5.22.3-RC2 and 5.24.1-RC2 today (cherry picked from commit 00804485030b1ffb4625e716a31c73532f41f32e) M pod/perlhist.pod commit 0ca170f28919bd8d8010a7161ac1a3e8469d56ef Author: Steve Hay <[email protected]> Date: Mon Jul 25 12:35:50 2016 +0100 Finalize perldelta M pod/perldelta.pod commit caf2ab233ac468dc9c075df1e41d65929984fdd9 Author: Steve Hay <[email protected]> Date: Mon Jul 25 12:35:10 2016 +0100 perldelta - List updated modules in 5.22.3-RC2 M pod/perldelta.pod commit ee719c34103a3cf082c1e1842ea02b8f7ce1ec32 Author: Steve Hay <[email protected]> Date: Mon Jul 25 12:14:17 2016 +0100 Update Module::CoreList data for 5.22.3-RC2 M dist/Module-CoreList/lib/Module/CoreList.pm commit 586d8ebc0a6bb65b92d186244a6a9e871c62b1a3 Author: Tony Cook <[email protected]> Date: Mon Jul 25 12:13:15 2016 +0100 (perl #127834) perldelta for . in @INC changes (Manually copied from maint-5.24. Also includes subsequent copy-editing by the Steve Hay.) M pod/perldelta.pod M t/porting/known_pod_issues.dat commit 94c781b3ce20124dcde1f0cce0086cf3fdf51a46 Author: Tony Cook <[email protected]> Date: Wed Jun 29 15:56:53 2016 +1000 (perl #127834) update CUSTOMIZED entries M Porting/Maintainers.pl M t/porting/customized.dat commit 85a4b6451d06b0a13b5d1f8dc68744c72587438e Author: Tony Cook <[email protected]> Date: Wed Jun 29 11:12:10 2016 +1000 cpan/: bump $VERSION as needed M cpan/CPAN/lib/App/Cpan.pm M cpan/Digest/Digest.pm M cpan/ExtUtils-Command/lib/ExtUtils/Command.pm M cpan/File-Fetch/lib/File/Fetch.pm M cpan/HTTP-Tiny/lib/HTTP/Tiny.pm M cpan/IPC-Cmd/lib/IPC/Cmd.pm M cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm M cpan/Memoize/Memoize.pm M cpan/Pod-Perldoc/lib/Pod/Perldoc.pm M cpan/Sys-Syslog/Syslog.pm M cpan/libnet/lib/Net/Cmd.pm M cpan/libnet/lib/Net/Config.pm M cpan/libnet/lib/Net/Domain.pm M cpan/libnet/lib/Net/FTP.pm M cpan/libnet/lib/Net/FTP/A.pm M cpan/libnet/lib/Net/FTP/E.pm M cpan/libnet/lib/Net/FTP/I.pm M cpan/libnet/lib/Net/FTP/L.pm M cpan/libnet/lib/Net/FTP/dataconn.pm M cpan/libnet/lib/Net/NNTP.pm M cpan/libnet/lib/Net/Netrc.pm M cpan/libnet/lib/Net/POP3.pm M cpan/libnet/lib/Net/SMTP.pm M cpan/libnet/lib/Net/Time.pm M dist/bignum/lib/bigint.pm M dist/bignum/lib/bignum.pm M dist/bignum/lib/bigrat.pm commit 0eae8f5acce3629731cd463ed7d4ec6e218a28e3 Author: Tony Cook <[email protected]> Date: Mon Jun 27 16:21:21 2016 +1000 cpan/: remove . from @INC when loading optional modules This was originally against maint-5.24 where bignum is in cpan/, but in maint-5.22 it was in dist/ M cpan/CPAN/lib/App/Cpan.pm M cpan/CPAN/lib/CPAN.pm M cpan/Digest/Digest.pm M cpan/Encode/Encode.pm M cpan/ExtUtils-Command/lib/ExtUtils/Command.pm M cpan/File-Fetch/lib/File/Fetch.pm M cpan/HTTP-Tiny/lib/HTTP/Tiny.pm M cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm M cpan/IPC-Cmd/lib/IPC/Cmd.pm M cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm M cpan/Memoize/Memoize.pm M cpan/Pod-Perldoc/lib/Pod/Perldoc.pm M cpan/Sys-Syslog/Syslog.pm M cpan/libnet/lib/Net/Config.pm M dist/bignum/lib/bigint.pm M dist/bignum/lib/bignum.pm M dist/bignum/lib/bigrat.pm commit bfe2dd1e9c3296bebf3ab9adc2ca48d3eb8d105d Author: Tony Cook <[email protected]> Date: Tue Jun 28 16:32:30 2016 +1000 dist/: bump $VERSION as needed This was originally patched in 5.24 where Test was in dist, hence the update to cpan/Test/ M cpan/Test/lib/Test.pm M dist/I18N-LangTags/lib/I18N/LangTags/Detect.pm M dist/IO/IO.pm M dist/Locale-Maketext/lib/Locale/Maketext.pm M dist/Net-Ping/lib/Net/Ping.pm M dist/PathTools/Cwd.pm M dist/PathTools/lib/File/Spec.pm M dist/PathTools/lib/File/Spec/Cygwin.pm M dist/PathTools/lib/File/Spec/Epoc.pm M dist/PathTools/lib/File/Spec/Functions.pm M dist/PathTools/lib/File/Spec/Mac.pm M dist/PathTools/lib/File/Spec/OS2.pm M dist/PathTools/lib/File/Spec/Unix.pm M dist/PathTools/lib/File/Spec/VMS.pm M dist/PathTools/lib/File/Spec/Win32.pm M dist/Storable/Storable.pm M dist/base/lib/base.pm commit ac5b10a9c5ff29cb2fbb732524e471547414c5f8 Author: Tony Cook <[email protected]> Date: Thu Jun 23 14:06:40 2016 +1000 dist/: remove . from @INC when loading optional modules M cpan/Test/lib/Test.pm M dist/I18N-LangTags/lib/I18N/LangTags/Detect.pm M dist/IO/IO.pm M dist/Locale-Maketext/lib/Locale/Maketext.pm M dist/Net-Ping/lib/Net/Ping.pm M dist/PathTools/Cwd.pm M dist/PathTools/lib/File/Spec/Cygwin.pm M dist/PathTools/lib/File/Spec/VMS.pm M dist/PathTools/lib/File/Spec/Win32.pm M dist/Storable/Storable.pm M dist/base/lib/base.pm commit 211eea87679bae9960e7e55689ab52dac83a80ee Author: Tony Cook <[email protected]> Date: Tue Jun 28 16:02:59 2016 +1000 perl5db.pl: bump perldb $VERSION Used _001 instead of _01 since 5.24 has 1.49_04 so presumably _01 through _03 has been used. M lib/perl5db.pl commit 8b4decb3288f1c5b6acceebf2246fdada0b5af3c Author: Tony Cook <[email protected]> Date: Thu Jun 23 10:41:48 2016 +1000 perl5db.pl: ensure PadWalker is loaded from standard paths M lib/perl5db.pl commit bbf435999781656cb79a49942629989fcf1a2d4d Author: Tony Cook <[email protected]> Date: Tue Jun 28 15:33:39 2016 +1000 (perl #127834) bump versions of modules in dists we updated a utility in M cpan/Archive-Tar/lib/Archive/Tar.pm M cpan/Archive-Tar/lib/Archive/Tar/Constant.pm M cpan/Archive-Tar/lib/Archive/Tar/File.pm M cpan/CPAN/lib/CPAN.pm M cpan/Digest-SHA/lib/Digest/SHA.pm M cpan/Encode/Encode.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm M cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm M cpan/IO-Compress/lib/Compress/Zlib.pm M cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm M cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm M cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm M cpan/IO-Compress/lib/IO/Compress/Base.pm M cpan/IO-Compress/lib/IO/Compress/Base/Common.pm M cpan/IO-Compress/lib/IO/Compress/Bzip2.pm M cpan/IO-Compress/lib/IO/Compress/Deflate.pm M cpan/IO-Compress/lib/IO/Compress/Gzip.pm M cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm M cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm M cpan/IO-Compress/lib/IO/Compress/Zip.pm M cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm M cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm M cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm M cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm M cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm M cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm M cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm M cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm M cpan/IO-Compress/lib/IO/Uncompress/Base.pm M cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm M cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm M cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm M cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm M cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm M cpan/JSON-PP/lib/JSON/PP.pm M cpan/Test-Harness/lib/App/Prove.pm M cpan/Test-Harness/lib/App/Prove/State.pm M cpan/Test-Harness/lib/App/Prove/State/Result.pm M cpan/Test-Harness/lib/App/Prove/State/Result/Test.pm M cpan/Test-Harness/lib/TAP/Base.pm M cpan/Test-Harness/lib/TAP/Formatter/Base.pm M cpan/Test-Harness/lib/TAP/Formatter/Color.pm M cpan/Test-Harness/lib/TAP/Formatter/Console.pm M cpan/Test-Harness/lib/TAP/Formatter/Console/ParallelSession.pm M cpan/Test-Harness/lib/TAP/Formatter/Console/Session.pm M cpan/Test-Harness/lib/TAP/Formatter/File.pm M cpan/Test-Harness/lib/TAP/Formatter/File/Session.pm M cpan/Test-Harness/lib/TAP/Formatter/Session.pm M cpan/Test-Harness/lib/TAP/Harness.pm M cpan/Test-Harness/lib/TAP/Harness/Env.pm M cpan/Test-Harness/lib/TAP/Object.pm M cpan/Test-Harness/lib/TAP/Parser.pm M cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm M cpan/Test-Harness/lib/TAP/Parser/Grammar.pm M cpan/Test-Harness/lib/TAP/Parser/Iterator.pm M cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm M cpan/Test-Harness/lib/TAP/Parser/Iterator/Process.pm M cpan/Test-Harness/lib/TAP/Parser/Iterator/Stream.pm M cpan/Test-Harness/lib/TAP/Parser/IteratorFactory.pm M cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm M cpan/Test-Harness/lib/TAP/Parser/Result.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Pragma.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Test.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Unknown.pm M cpan/Test-Harness/lib/TAP/Parser/Result/Version.pm M cpan/Test-Harness/lib/TAP/Parser/Result/YAML.pm M cpan/Test-Harness/lib/TAP/Parser/ResultFactory.pm M cpan/Test-Harness/lib/TAP/Parser/Scheduler.pm M cpan/Test-Harness/lib/TAP/Parser/Scheduler/Job.pm M cpan/Test-Harness/lib/TAP/Parser/Scheduler/Spinner.pm M cpan/Test-Harness/lib/TAP/Parser/Source.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler/Executable.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler/File.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler/Handle.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler/Perl.pm M cpan/Test-Harness/lib/TAP/Parser/SourceHandler/RawTAP.pm M cpan/Test-Harness/lib/TAP/Parser/YAMLish/Reader.pm M cpan/Test-Harness/lib/TAP/Parser/YAMLish/Writer.pm M cpan/Test-Harness/lib/Test/Harness.pm M ext/Pod-Html/lib/Pod/Html.pm commit b86ce833e04130ff942834c475aa41d862257987 Author: Tony Cook <[email protected]> Date: Tue Jun 21 10:02:02 2016 +1000 (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. M cpan/Archive-Tar/bin/ptar M cpan/Archive-Tar/bin/ptardiff M cpan/Archive-Tar/bin/ptargrep M cpan/CPAN/scripts/cpan M cpan/Digest-SHA/shasum M cpan/Encode/bin/enc2xs M cpan/Encode/bin/encguess M cpan/Encode/bin/piconv M cpan/Encode/bin/ucmlint M cpan/Encode/bin/unidump M cpan/ExtUtils-MakeMaker/bin/instmodsh M cpan/IO-Compress/bin/zipdetails M cpan/JSON-PP/bin/json_pp M cpan/Test-Harness/bin/prove M dist/ExtUtils-ParseXS/lib/ExtUtils/xsubpp M dist/Module-CoreList/corelist M ext/Pod-Html/bin/pod2html M utils/c2ph.PL M utils/h2ph.PL M utils/h2xs.PL M utils/libnetcfg.PL M utils/perlbug.PL M utils/perldoc.PL M utils/perlivp.PL M utils/splain.PL ----------------------------------------------------------------------- Summary of changes: META.json | 2 +- Porting/Maintainers.pl | 163 ++++++++++++++++- cpan/Archive-Tar/bin/ptar | 1 + cpan/Archive-Tar/bin/ptardiff | 1 + cpan/Archive-Tar/bin/ptargrep | 1 + cpan/Archive-Tar/lib/Archive/Tar.pm | 2 +- cpan/Archive-Tar/lib/Archive/Tar/Constant.pm | 2 +- cpan/Archive-Tar/lib/Archive/Tar/File.pm | 2 +- cpan/CPAN/lib/App/Cpan.pm | 23 ++- cpan/CPAN/lib/CPAN.pm | 6 +- cpan/CPAN/scripts/cpan | 1 + cpan/Digest-SHA/lib/Digest/SHA.pm | 2 +- cpan/Digest-SHA/shasum | 1 + cpan/Digest/Digest.pm | 8 +- cpan/Encode/Encode.pm | 4 +- cpan/Encode/bin/enc2xs | 1 + cpan/Encode/bin/encguess | 1 + cpan/Encode/bin/piconv | 1 + cpan/Encode/bin/ucmlint | 1 + cpan/Encode/bin/unidump | 1 + cpan/ExtUtils-Command/lib/ExtUtils/Command.pm | 7 +- cpan/ExtUtils-MakeMaker/bin/instmodsh | 1 + cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm | 2 +- .../ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm | 2 +- .../lib/ExtUtils/MakeMaker/Config.pm | 2 +- .../ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm | 2 +- cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm | 2 +- cpan/File-Fetch/lib/File/Fetch.pm | 12 +- cpan/HTTP-Tiny/lib/HTTP/Tiny.pm | 4 +- cpan/IO-Compress/bin/zipdetails | 1 + cpan/IO-Compress/lib/Compress/Zlib.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm | 2 +- .../IO-Compress/lib/IO/Compress/Adapter/Deflate.pm | 2 +- .../lib/IO/Compress/Adapter/Identity.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Base.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Base/Common.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Bzip2.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Deflate.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Gzip.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Zip.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm | 2 +- cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm | 2 +- .../lib/IO/Uncompress/Adapter/Bunzip2.pm | 2 +- .../lib/IO/Uncompress/Adapter/Identity.pm | 2 +- .../lib/IO/Uncompress/Adapter/Inflate.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm | 2 +- .../IO-Compress/lib/IO/Uncompress/AnyUncompress.pm | 4 +- cpan/IO-Compress/lib/IO/Uncompress/Base.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm | 2 +- cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm | 2 +- cpan/IPC-Cmd/lib/IPC/Cmd.pm | 6 +- cpan/JSON-PP/bin/json_pp | 1 + cpan/JSON-PP/lib/JSON/PP.pm | 2 +- .../lib/Locale/Maketext/Simple.pm | 9 +- cpan/Memoize/Memoize.pm | 8 +- cpan/Pod-Perldoc/lib/Pod/Perldoc.pm | 7 +- cpan/Sys-Syslog/Syslog.pm | 4 +- cpan/Test-Harness/bin/prove | 1 + cpan/Test-Harness/lib/App/Prove.pm | 2 +- cpan/Test-Harness/lib/App/Prove/State.pm | 2 +- cpan/Test-Harness/lib/App/Prove/State/Result.pm | 2 +- .../lib/App/Prove/State/Result/Test.pm | 2 +- cpan/Test-Harness/lib/TAP/Base.pm | 2 +- cpan/Test-Harness/lib/TAP/Formatter/Base.pm | 2 +- cpan/Test-Harness/lib/TAP/Formatter/Color.pm | 2 +- cpan/Test-Harness/lib/TAP/Formatter/Console.pm | 2 +- .../lib/TAP/Formatter/Console/ParallelSession.pm | 2 +- .../lib/TAP/Formatter/Console/Session.pm | 2 +- cpan/Test-Harness/lib/TAP/Formatter/File.pm | 2 +- .../Test-Harness/lib/TAP/Formatter/File/Session.pm | 2 +- cpan/Test-Harness/lib/TAP/Formatter/Session.pm | 2 +- cpan/Test-Harness/lib/TAP/Harness.pm | 2 +- cpan/Test-Harness/lib/TAP/Harness/Env.pm | 2 +- cpan/Test-Harness/lib/TAP/Object.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Grammar.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Iterator.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm | 2 +- .../lib/TAP/Parser/Iterator/Process.pm | 2 +- .../Test-Harness/lib/TAP/Parser/Iterator/Stream.pm | 2 +- .../Test-Harness/lib/TAP/Parser/IteratorFactory.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Pragma.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Test.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Unknown.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/Version.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Result/YAML.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/ResultFactory.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Scheduler.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Scheduler/Job.pm | 2 +- .../lib/TAP/Parser/Scheduler/Spinner.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/Source.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/SourceHandler.pm | 2 +- .../lib/TAP/Parser/SourceHandler/Executable.pm | 2 +- .../lib/TAP/Parser/SourceHandler/File.pm | 2 +- .../lib/TAP/Parser/SourceHandler/Handle.pm | 2 +- .../lib/TAP/Parser/SourceHandler/Perl.pm | 2 +- .../lib/TAP/Parser/SourceHandler/RawTAP.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/YAMLish/Reader.pm | 2 +- cpan/Test-Harness/lib/TAP/Parser/YAMLish/Writer.pm | 2 +- cpan/Test-Harness/lib/Test/Harness.pm | 2 +- cpan/Test/lib/Test.pm | 9 +- cpan/libnet/lib/Net/Cmd.pm | 2 +- cpan/libnet/lib/Net/Config.pm | 9 +- cpan/libnet/lib/Net/Domain.pm | 2 +- cpan/libnet/lib/Net/FTP.pm | 2 +- cpan/libnet/lib/Net/FTP/A.pm | 2 +- cpan/libnet/lib/Net/FTP/E.pm | 2 +- cpan/libnet/lib/Net/FTP/I.pm | 2 +- cpan/libnet/lib/Net/FTP/L.pm | 2 +- cpan/libnet/lib/Net/FTP/dataconn.pm | 2 +- cpan/libnet/lib/Net/NNTP.pm | 2 +- cpan/libnet/lib/Net/Netrc.pm | 2 +- cpan/libnet/lib/Net/POP3.pm | 2 +- cpan/libnet/lib/Net/SMTP.pm | 2 +- cpan/libnet/lib/Net/Time.pm | 2 +- dist/ExtUtils-ParseXS/lib/ExtUtils/xsubpp | 1 + dist/I18N-LangTags/lib/I18N/LangTags/Detect.pm | 4 +- dist/IO/IO.pm | 4 +- dist/Locale-Maketext/lib/Locale/Maketext.pm | 4 +- dist/Module-CoreList/corelist | 1 + dist/Module-CoreList/lib/Module/CoreList.pm | 153 ++++++++++++++++ dist/Net-Ping/lib/Net/Ping.pm | 8 +- dist/PathTools/Cwd.pm | 7 +- dist/PathTools/lib/File/Spec.pm | 2 +- dist/PathTools/lib/File/Spec/Cygwin.pm | 8 +- dist/PathTools/lib/File/Spec/Epoc.pm | 2 +- dist/PathTools/lib/File/Spec/Functions.pm | 2 +- dist/PathTools/lib/File/Spec/Mac.pm | 2 +- dist/PathTools/lib/File/Spec/OS2.pm | 2 +- dist/PathTools/lib/File/Spec/Unix.pm | 2 +- dist/PathTools/lib/File/Spec/VMS.pm | 7 +- dist/PathTools/lib/File/Spec/Win32.pm | 8 +- dist/Storable/Storable.pm | 10 +- dist/base/lib/base.pm | 8 +- dist/bignum/lib/bigint.pm | 4 +- dist/bignum/lib/bignum.pm | 4 +- dist/bignum/lib/bigrat.pm | 4 +- ext/Pod-Html/bin/pod2html | 1 + ext/Pod-Html/lib/Pod/Html.pm | 2 +- lib/perl5db.pl | 12 +- patchlevel.h | 1 + pod/perldelta.pod | 194 ++++++++++++++++++++- pod/perlhist.pod | 2 + t/porting/customized.dat | 174 +++++++++++++++--- t/porting/known_pod_issues.dat | 1 + utils/c2ph.PL | 1 + utils/h2ph.PL | 2 + utils/h2xs.PL | 2 + utils/libnetcfg.PL | 1 + utils/perlbug.PL | 1 + utils/perldoc.PL | 5 +- utils/perlivp.PL | 2 + utils/splain.PL | 6 + 186 files changed, 974 insertions(+), 213 deletions(-) diff --git a/META.json b/META.json index 39fa323..28bdd07 100644 --- a/META.json +++ b/META.json @@ -112,7 +112,7 @@ "vxs.inc" ] }, - "release_status" : "stable", + "release_status" : "testing", "resources" : { "bugtracker" : { "web" : "https://rt.perl.org/"; diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index fbf81f1..058676b 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -125,6 +125,13 @@ use File::Glob qw(:case); 'EXCLUDED' => [ qw(t/07_ptardiff.t), ], + 'CUSTOMIZED' => [ + qw( + bin/ptar bin/ptardiff bin/ptargrep + lib/Archive/Tar.pm lib/Archive/Tar/Constant.pm + lib/Archive/Tar/File.pm + ) + ], }, 'Attribute::Handlers' => { @@ -179,6 +186,10 @@ use File::Glob qw(:case); 'base' => { 'DISTRIBUTION' => 'RGARCIA/base-2.18.tar.gz', 'FILES' => q[dist/base], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/base.pm ) + ], }, 'bignum' => { @@ -278,6 +289,8 @@ use File::Glob qw(:case); ], 'CUSTOMIZED' => [ qw( lib/CPAN.pm ), + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/App/Cpan.pm scripts/cpan ) ], }, @@ -356,6 +369,10 @@ use File::Glob qw(:case); 'DISTRIBUTION' => 'GAAS/Digest-1.17.tar.gz', 'FILES' => q[cpan/Digest], 'EXCLUDED' => ['digest-bench'], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( Digest.pm ) + ], }, 'Digest::MD5' => { @@ -373,6 +390,10 @@ use File::Glob qw(:case); examples/dups ), ], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/Digest/SHA.pm shasum ) + ], }, 'Dumpvalue' => { @@ -384,6 +405,13 @@ use File::Glob qw(:case); 'Encode' => { 'DISTRIBUTION' => 'DANKOGAI/Encode-2.72.tar.gz', 'FILES' => q[cpan/Encode], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( + Encode.pm bin/enc2xs bin/encguess bin/piconv + bin/ucmlint bin/unidump + ) + ], }, 'encoding::warnings' => { @@ -433,6 +461,10 @@ use File::Glob qw(:case); 'DISTRIBUTION' => 'BINGOS/ExtUtils-Command-1.20.tar.gz', 'FILES' => q[cpan/ExtUtils-Command], 'EXCLUDED' => [qr{^xt/}], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/ExtUtils/Command.pm ) + ], }, 'ExtUtils::Constant' => { @@ -510,7 +542,10 @@ use File::Glob qw(:case); lib/ExtUtils/MakeMaker/version/vpp.pm lib/ExtUtils/Mkbootstrap.pm lib/ExtUtils/Mksymlists.pm - lib/ExtUtils/testlib.pm ] ], + lib/ExtUtils/testlib.pm ], + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( bin/instmodsh ) + ], }, 'ExtUtils::Manifest' => { @@ -530,6 +565,10 @@ use File::Glob qw(:case); 'File::Fetch' => { 'DISTRIBUTION' => 'BINGOS/File-Fetch-0.48.tar.gz', 'FILES' => q[cpan/File-Fetch], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/File/Fetch.pm ) + ], }, 'File::Path' => { @@ -626,7 +665,11 @@ use File::Glob qw(:case); qr/^eg/, qr/^xt/ ], - }, + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/HTTP/Tiny.pm ) + ], + }, 'I18N::Collate' => { 'DISTRIBUTION' => 'FLORA/I18N-Collate-1.02.tar.gz', @@ -659,6 +702,37 @@ use File::Glob qw(:case); 't/010examples-zlib.t', 't/cz-05examples.t', ], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( + bin/zipdetails lib/Compress/Zlib.pm + lib/IO/Compress/Adapter/Bzip2.pm + lib/IO/Compress/Adapter/Deflate.pm + lib/IO/Compress/Adapter/Identity.pm + lib/IO/Compress/Base.pm + lib/IO/Compress/Base/Common.pm + lib/IO/Compress/Bzip2.pm + lib/IO/Compress/Deflate.pm + lib/IO/Compress/Gzip.pm + lib/IO/Compress/Gzip/Constants.pm + lib/IO/Compress/RawDeflate.pm + lib/IO/Compress/Zip.pm + lib/IO/Compress/Zip/Constants.pm + lib/IO/Compress/Zlib/Constants.pm + lib/IO/Compress/Zlib/Extra.pm + lib/IO/Uncompress/Adapter/Bunzip2.pm + lib/IO/Uncompress/Adapter/Identity.pm + lib/IO/Uncompress/Adapter/Inflate.pm + lib/IO/Uncompress/AnyInflate.pm + lib/IO/Uncompress/AnyUncompress.pm + lib/IO/Uncompress/Base.pm + lib/IO/Uncompress/Bunzip2.pm + lib/IO/Uncompress/Gunzip.pm + lib/IO/Uncompress/Inflate.pm + lib/IO/Uncompress/RawInflate.pm + lib/IO/Uncompress/Unzip.pm + ) + ], }, 'IO::Socket::IP' => { @@ -677,6 +751,10 @@ use File::Glob qw(:case); 'IPC::Cmd' => { 'DISTRIBUTION' => 'BINGOS/IPC-Cmd-0.92.tar.gz', 'FILES' => q[cpan/IPC-Cmd], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/IPC/Cmd.pm ) + ], }, 'IPC::SysV' => { @@ -692,6 +770,10 @@ use File::Glob qw(:case); 'JSON::PP' => { 'DISTRIBUTION' => 'MAKAMAKA/JSON-PP-2.27300.tar.gz', 'FILES' => q[cpan/JSON-PP], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( bin/json_pp lib/JSON/PP.pm ) + ], }, 'lib' => { @@ -717,6 +799,16 @@ use File::Glob qw(:case); qr(^demos/), qr(^t/external/), ], + 'CUSTOMIZED' => [ + qw( + lib/Net/Cmd.pm lib/Net/Config.pm + lib/Net/Domain.pm lib/Net/FTP.pm lib/Net/FTP/A.pm + lib/Net/FTP/E.pm lib/Net/FTP/I.pm + lib/Net/FTP/L.pm lib/Net/FTP/dataconn.pm + lib/Net/NNTP.pm lib/Net/Netrc.pm lib/Net/POP3.pm + lib/Net/SMTP.pm lib/Net/Time.pm + ) + ], }, 'Locale-Codes' => { @@ -749,6 +841,10 @@ use File::Glob qw(:case); 'Locale::Maketext::Simple' => { 'DISTRIBUTION' => 'JESSE/Locale-Maketext-Simple-0.21.tar.gz', 'FILES' => q[cpan/Locale-Maketext-Simple], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/Locale/Maketext/Simple.pm ) + ], }, 'Math::BigInt' => { @@ -815,6 +911,10 @@ use File::Glob qw(:case); 'DISTRIBUTION' => 'MJD/Memoize-1.03.tgz', 'FILES' => q[cpan/Memoize], 'EXCLUDED' => ['article.html'], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( Memoize.pm ) + ], }, 'MIME::Base64' => { @@ -942,6 +1042,10 @@ use File::Glob qw(:case); # XXX We can and should fix this, but clean up the DRY-failure in utils # first 'EXCLUDED' => ['perldoc'], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/Pod/Perldoc.pm ) + ], }, 'Pod::Simple' => { @@ -1023,6 +1127,9 @@ use File::Glob qw(:case); win32/PerlLog.RES ), ], + 'CUSTOMIZED' => [ + qw( Syslog.pm ) + ], }, 'Term::ANSIColor' => { @@ -1057,6 +1164,10 @@ use File::Glob qw(:case); 'Test' => { 'DISTRIBUTION' => 'JESSE/Test-1.26.tar.gz', 'FILES' => q[cpan/Test], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( lib/Test.pm ) + ], }, 'Test::Harness' => { @@ -1076,6 +1187,54 @@ use File::Glob qw(:case); t/lib/if.pm ), ], + 'CUSTOMIZED' => [ + # https://rt.perl.org/Ticket/Display.html?id=127834 + qw( + bin/prove lib/App/Prove.pm lib/App/Prove/State.pm + lib/App/Prove/State/Result.pm + lib/App/Prove/State/Result/Test.pm + lib/TAP/Base.pm lib/TAP/Formatter/Base.pm + lib/TAP/Formatter/Color.pm + lib/TAP/Formatter/Console.pm + lib/TAP/Formatter/Console/ParallelSession.pm + lib/TAP/Formatter/Console/Session.pm + lib/TAP/Formatter/File.pm + lib/TAP/Formatter/File/Session.pm + lib/TAP/Formatter/Session.pm lib/TAP/Harness.pm + lib/TAP/Harness/Env.pm lib/TAP/Object.pm + lib/TAP/Parser.pm lib/TAP/Parser/Aggregator.pm + lib/TAP/Parser/Grammar.pm + lib/TAP/Parser/Iterator.pm + lib/TAP/Parser/Iterator/Array.pm + lib/TAP/Parser/Iterator/Process.pm + lib/TAP/Parser/Iterator/Stream.pm + lib/TAP/Parser/IteratorFactory.pm + lib/TAP/Parser/Multiplexer.pm + lib/TAP/Parser/Result.pm + lib/TAP/Parser/Result/Bailout.pm + lib/TAP/Parser/Result/Comment.pm + lib/TAP/Parser/Result/Plan.pm + lib/TAP/Parser/Result/Pragma.pm + lib/TAP/Parser/Result/Test.pm + lib/TAP/Parser/Result/Unknown.pm + lib/TAP/Parser/Result/Version.pm + lib/TAP/Parser/Result/YAML.pm + lib/TAP/Parser/ResultFactory.pm + lib/TAP/Parser/Scheduler.pm + lib/TAP/Parser/Scheduler/Job.pm + lib/TAP/Parser/Scheduler/Spinner.pm + lib/TAP/Parser/Source.pm + lib/TAP/Parser/SourceHandler.pm + lib/TAP/Parser/SourceHandler/Executable.pm + lib/TAP/Parser/SourceHandler/File.pm + lib/TAP/Parser/SourceHandler/Handle.pm + lib/TAP/Parser/SourceHandler/Perl.pm + lib/TAP/Parser/SourceHandler/RawTAP.pm + lib/TAP/Parser/YAMLish/Reader.pm + lib/TAP/Parser/YAMLish/Writer.pm + lib/Test/Harness.pm + ) + ], }, 'Test::Simple' => { diff --git a/cpan/Archive-Tar/bin/ptar b/cpan/Archive-Tar/bin/ptar index 0eaffa7..9dc6402 100644 --- a/cpan/Archive-Tar/bin/ptar +++ b/cpan/Archive-Tar/bin/ptar @@ -1,6 +1,7 @@ #!/usr/bin/perl use strict; +BEGIN { pop @INC if $INC[-1] eq '.' } use File::Find; use Getopt::Std; use Archive::Tar; diff --git a/cpan/Archive-Tar/bin/ptardiff b/cpan/Archive-Tar/bin/ptardiff index 66bd859..4668fa6 100644 --- a/cpan/Archive-Tar/bin/ptardiff +++ b/cpan/Archive-Tar/bin/ptardiff @@ -1,5 +1,6 @@ #!/usr/bin/perl +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use Archive::Tar; use Getopt::Std; diff --git a/cpan/Archive-Tar/bin/ptargrep b/cpan/Archive-Tar/bin/ptargrep index 1a320f1..8dc6b4f 100644 --- a/cpan/Archive-Tar/bin/ptargrep +++ b/cpan/Archive-Tar/bin/ptargrep @@ -4,6 +4,7 @@ # archive. See 'ptargrep --help' for more documentation. # +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings; diff --git a/cpan/Archive-Tar/lib/Archive/Tar.pm b/cpan/Archive-Tar/lib/Archive/Tar.pm index 1b792df..6a047a3 100644 --- a/cpan/Archive-Tar/lib/Archive/Tar.pm +++ b/cpan/Archive-Tar/lib/Archive/Tar.pm @@ -31,7 +31,7 @@ use vars qw[$DEBUG $error $VERSION $WARN $FOLLOW_SYMLINK $CHOWN $CHMOD $DEBUG = 0; $WARN = 1; $FOLLOW_SYMLINK = 0; -$VERSION = "2.04"; +$VERSION = "2.04_01"; $CHOWN = 1; $CHMOD = 1; $SAME_PERMISSIONS = $> == 0 ? 1 : 0; diff --git a/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm b/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm index 399aaf6..f9557e9 100644 --- a/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm +++ b/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm @@ -3,7 +3,7 @@ package Archive::Tar::Constant; BEGIN { require Exporter; - $VERSION = '2.04'; + $VERSION = '2.04_01'; @ISA = qw[Exporter]; require Time::Local if $^O eq "MacOS"; diff --git a/cpan/Archive-Tar/lib/Archive/Tar/File.pm b/cpan/Archive-Tar/lib/Archive/Tar/File.pm index 3aa1b3c..3ecad56 100644 --- a/cpan/Archive-Tar/lib/Archive/Tar/File.pm +++ b/cpan/Archive-Tar/lib/Archive/Tar/File.pm @@ -13,7 +13,7 @@ use Archive::Tar::Constant; use vars qw[@ISA $VERSION]; #@ISA = qw[Archive::Tar]; -$VERSION = '2.04'; +$VERSION = '2.04_01'; ### set value to 1 to oct() it during the unpack ### diff --git a/cpan/CPAN/lib/App/Cpan.pm b/cpan/CPAN/lib/App/Cpan.pm index e8c9bb7..94607d9 100644 --- a/cpan/CPAN/lib/App/Cpan.pm +++ b/cpan/CPAN/lib/App/Cpan.pm @@ -6,7 +6,7 @@ use vars qw($VERSION); use if $] < 5.008 => 'IO::Scalar'; -$VERSION = '1.63'; +$VERSION = '1.63_01'; =head1 NAME @@ -530,9 +530,20 @@ sub AUTOLOAD { 1 } sub DESTROY { 1 } } +# load a module without searching the default entry for the current +# directory +sub _safe_load_module { + my $name = shift; + + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + + eval "require $name; 1"; +} + sub _init_logger { - my $log4perl_loaded = eval "require Log::Log4perl; 1"; + my $log4perl_loaded = _safe_load_module("Log::Log4perl"); unless( $log4perl_loaded ) { @@ -993,7 +1004,7 @@ sub _load_local_lib # -I { $logger->debug( "Loading local::lib" ); - my $rc = eval { require local::lib; 1; }; + my $rc = _safe_load_module("local::lib"); unless( $rc ) { $logger->die( "Could not load local::lib" ); } @@ -1121,7 +1132,7 @@ sub _get_file { my $path = shift; - my $loaded = eval "require LWP::Simple; 1;"; + my $loaded = _safe_load_module("LWP::Simple"); croak "You need LWP::Simple to use features that fetch files from CPAN\n" unless $loaded; @@ -1143,7 +1154,7 @@ sub _gitify { my $args = shift; - my $loaded = eval "require Archive::Extract; 1;"; + my $loaded = _safe_load_module("Archive::Extract"); croak "You need Archive::Extract to use features that gitify distributions\n" unless $loaded; @@ -1207,7 +1218,7 @@ sub _show_Changes sub _get_changes_file { croak "Reading Changes files requires LWP::Simple and URI\n" - unless eval "require LWP::Simple; require URI; 1"; + unless _safe_load_module("LWP::Simple") && _safe_load_module("URI"); my $url = shift; diff --git a/cpan/CPAN/lib/CPAN.pm b/cpan/CPAN/lib/CPAN.pm index 6096916..25bf349 100644 --- a/cpan/CPAN/lib/CPAN.pm +++ b/cpan/CPAN/lib/CPAN.pm @@ -2,7 +2,7 @@ # vim: ts=4 sts=4 sw=4: use strict; package CPAN; -$CPAN::VERSION = '2.11'; +$CPAN::VERSION = '2.11_01'; $CPAN::VERSION =~ s/_//; # we need to run chdir all over and we would get at wrong libraries @@ -1104,6 +1104,8 @@ sub has_usable { ] }; if ($usable->{$mod}) { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; for my $c (0..$#{$usable->{$mod}}) { my $code = $usable->{$mod}[$c]; my $ret = eval { &$code() }; @@ -1146,6 +1148,8 @@ sub has_inst { $CPAN::META->{dontload_hash}{$mod}||=1; # unsafe meta access, ok return 0; } + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; my $file = $mod; my $obj; $file =~ s|::|/|g; diff --git a/cpan/CPAN/scripts/cpan b/cpan/CPAN/scripts/cpan index 5f4320e..ccba47e 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); diff --git a/cpan/Digest-SHA/lib/Digest/SHA.pm b/cpan/Digest-SHA/lib/Digest/SHA.pm index 3abca3d..e696dec 100644 --- a/cpan/Digest-SHA/lib/Digest/SHA.pm +++ b/cpan/Digest-SHA/lib/Digest/SHA.pm @@ -8,7 +8,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); use Fcntl; use integer; -$VERSION = '5.95'; +$VERSION = '5.95_01'; require Exporter; require DynaLoader; diff --git a/cpan/Digest-SHA/shasum b/cpan/Digest-SHA/shasum index 14ddd60..62a2b0e 100644 --- a/cpan/Digest-SHA/shasum +++ b/cpan/Digest-SHA/shasum @@ -13,6 +13,7 @@ ## "-0" option for reading bit strings, and ## "-p" option for portable digests (to be deprecated). +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings; use Fcntl; diff --git a/cpan/Digest/Digest.pm b/cpan/Digest/Digest.pm index c3355a8..16dae9d 100644 --- a/cpan/Digest/Digest.pm +++ b/cpan/Digest/Digest.pm @@ -3,7 +3,7 @@ package Digest; use strict; use vars qw($VERSION %MMAP $AUTOLOAD); -$VERSION = "1.17"; +$VERSION = "1.17_01"; %MMAP = ( "SHA-1" => [["Digest::SHA", 1], "Digest::SHA1", ["Digest::SHA2", 1]], @@ -38,7 +38,11 @@ sub new unless (exists ${"$class\::"}{"VERSION"}) { my $pm_file = $class . ".pm"; $pm_file =~ s{::}{/}g; - eval { require $pm_file }; + eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require $pm_file + }; if ($@) { $err ||= $@; next; diff --git a/cpan/Encode/Encode.pm b/cpan/Encode/Encode.pm index 3bb10970..874cbc6 100644 --- a/cpan/Encode/Encode.pm +++ b/cpan/Encode/Encode.pm @@ -4,7 +4,7 @@ package Encode; use strict; use warnings; -our $VERSION = sprintf "%d.%02d", q$Revision: 2.72 $ =~ /(\d+)/g; +our $VERSION = sprintf "%d.%02d_01", q$Revision: 2.72 $ =~ /(\d+)/g; use constant DEBUG => !!$ENV{PERL_ENCODE_DEBUG}; use XSLoader (); XSLoader::load( __PACKAGE__, $VERSION ); @@ -56,6 +56,8 @@ require Encode::Config; eval { local $SIG{__DIE__}; local $SIG{__WARN__}; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; require Encode::ConfigLocal; }; diff --git a/cpan/Encode/bin/enc2xs b/cpan/Encode/bin/enc2xs index 19f2b2b..121e0c2 100644 --- a/cpan/Encode/bin/enc2xs +++ b/cpan/Encode/bin/enc2xs @@ -4,6 +4,7 @@ BEGIN { # with $ENV{PERL_CORE} set # In case we need it in future... require Config; import Config; + pop @INC if $INC[-1] eq '.'; } use strict; use warnings; diff --git a/cpan/Encode/bin/encguess b/cpan/Encode/bin/encguess index 5d7ac80..0be5c7c 100644 --- a/cpan/Encode/bin/encguess +++ b/cpan/Encode/bin/encguess @@ -1,5 +1,6 @@ #!./perl use 5.008001; +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings; use Encode; diff --git a/cpan/Encode/bin/piconv b/cpan/Encode/bin/piconv index c1dad9e..60b2a59 100644 --- a/cpan/Encode/bin/piconv +++ b/cpan/Encode/bin/piconv @@ -1,6 +1,7 @@ #!./perl # $Id: piconv,v 2.7 2014/05/31 09:48:48 dankogai Exp $ # +BEGIN { pop @INC if $INC[-1] eq '.' } use 5.8.0; use strict; use Encode ; diff --git a/cpan/Encode/bin/ucmlint b/cpan/Encode/bin/ucmlint index 622376d..25e0d67 100644 --- a/cpan/Encode/bin/ucmlint +++ b/cpan/Encode/bin/ucmlint @@ -3,6 +3,7 @@ # $Id: ucmlint,v 2.2 2008/03/12 09:51:11 dankogai Exp $ # +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; our $VERSION = do { my @r = (q$Revision: 2.2 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; diff --git a/cpan/Encode/bin/unidump b/cpan/Encode/bin/unidump index ae0da30..f190827 100644 --- a/cpan/Encode/bin/unidump +++ b/cpan/Encode/bin/unidump @@ -1,5 +1,6 @@ #!./perl +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use Encode; use Getopt::Std; diff --git a/cpan/ExtUtils-Command/lib/ExtUtils/Command.pm b/cpan/ExtUtils-Command/lib/ExtUtils/Command.pm index 7f3161a..01432dc 100644 --- a/cpan/ExtUtils-Command/lib/ExtUtils/Command.pm +++ b/cpan/ExtUtils-Command/lib/ExtUtils/Command.pm @@ -7,7 +7,7 @@ use vars qw(@ISA @EXPORT @EXPORT_OK $VERSION); @ISA = qw(Exporter); @EXPORT = qw(cp rm_f rm_rf mv cat eqtime mkpath touch test_f test_d chmod dos2unix); -$VERSION = '1.20'; +$VERSION = '1.20_01'; my $Is_VMS = $^O eq 'VMS'; my $Is_VMS_mode = $Is_VMS; @@ -19,7 +19,10 @@ if( $Is_VMS ) { my $vms_efs; my $vms_case; - if (eval { local $SIG{__DIE__}; require VMS::Feature; }) { + if (eval { local $SIG{__DIE__}; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require VMS::Feature; }) { $vms_unix_rpt = VMS::Feature::current("filename_unix_report"); $vms_efs = VMS::Feature::current("efs_charset"); $vms_case = VMS::Feature::current("efs_case_preserve"); diff --git a/cpan/ExtUtils-MakeMaker/bin/instmodsh b/cpan/ExtUtils-MakeMaker/bin/instmodsh index 8b9aa95..ab0f9d1 100644 --- a/cpan/ExtUtils-MakeMaker/bin/instmodsh +++ b/cpan/ExtUtils-MakeMaker/bin/instmodsh @@ -1,5 +1,6 @@ #!/usr/bin/perl -w +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use IO::File; use ExtUtils::Packlist; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm index 203b3aa..ad67aef 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm @@ -10,7 +10,7 @@ our @ISA = qw(Exporter); our @EXPORT = qw(test_harness pod2man perllocal_install uninstall warn_if_old_packlist test_s cp_nonempty); -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; my $Is_VMS = $^O eq 'VMS'; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm index 3df1793..3a4e138 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm @@ -2,7 +2,7 @@ package ExtUtils::Liblist; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; use File::Spec; require ExtUtils::Liblist::Kid; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm index 37bcfd4..66e4caa 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm @@ -11,7 +11,7 @@ use 5.006; use strict; use warnings; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; use ExtUtils::MakeMaker::Config; use Cwd 'cwd'; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm index f2aa8b4..c137ffa 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm @@ -3,7 +3,7 @@ package ExtUtils::MM; use strict; use ExtUtils::MakeMaker::Config; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::Liblist; require ExtUtils::MakeMaker; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm index 58ea5b9..a52db81 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_AIX; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Unix; our @ISA = qw(ExtUtils::MM_Unix); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm index 4c00129..5c2f515 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_Any; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; use Carp; use File::Spec; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm index 35b76c0..d4267c0 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm @@ -26,7 +26,7 @@ require ExtUtils::MM_Any; require ExtUtils::MM_Unix; our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; =item os_flavor diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm index b504c47..8252651 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm @@ -9,7 +9,7 @@ require ExtUtils::MM_Unix; require ExtUtils::MM_Win32; our @ISA = qw( ExtUtils::MM_Unix ); -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; =head1 NAME diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm index 353c54f..ac5bfd5 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm @@ -2,7 +2,7 @@ package ExtUtils::MM_DOS; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Any; require ExtUtils::MM_Unix; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm index 315d1b4..08431d2 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm @@ -7,7 +7,7 @@ BEGIN { our @ISA = qw( ExtUtils::MM_Unix ); } -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; =head1 NAME diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm index bef2c00..ab505fe 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm @@ -2,7 +2,7 @@ package ExtUtils::MM_MacOS; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; sub new { die 'MacOS Classic (MacPerl) is no longer supported by MakeMaker'; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm index 4e36796..6d189c0 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm @@ -22,7 +22,7 @@ use strict; use ExtUtils::MakeMaker::Config; use File::Basename; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Win32; our @ISA = qw(ExtUtils::MM_Win32); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm index c9ace00..441032b 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm @@ -5,7 +5,7 @@ use strict; use ExtUtils::MakeMaker qw(neatvalue); use File::Spec; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Any; require ExtUtils::MM_Unix; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm index 13e12c4..82ea50c 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_QNX; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Unix; our @ISA = qw(ExtUtils::MM_Unix); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm index 4af2909..3d20415 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_UWIN; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Unix; our @ISA = qw(ExtUtils::MM_Unix); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm index f63145c..d4312b0 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm @@ -15,7 +15,7 @@ use ExtUtils::MakeMaker qw($Verbose neatvalue); # If we make $VERSION an our variable parse_version() breaks use vars qw($VERSION); -$VERSION = '7.04_01'; +$VERSION = '7.04_02'; $VERSION = eval $VERSION; ## no critic [BuiltinFunctions::ProhibitStringyEval] require ExtUtils::MM_Any; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm index 45d06b0..f3bfaf9 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm @@ -15,7 +15,7 @@ BEGIN { use File::Basename; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Any; require ExtUtils::MM_Unix; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm index dfec6d5..1f0e455 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm @@ -1,7 +1,7 @@ package ExtUtils::MM_VOS; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Unix; our @ISA = qw(ExtUtils::MM_Unix); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm index fbd3f49..7edaf8f 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm @@ -27,7 +27,7 @@ use ExtUtils::MakeMaker qw( neatvalue ); require ExtUtils::MM_Any; require ExtUtils::MM_Unix; our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix ); -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; $ENV{EMXSHELL} = 'sh'; # to run `commands` diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm index cc37c24..8e03a60 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm @@ -2,7 +2,7 @@ package ExtUtils::MM_Win95; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require ExtUtils::MM_Win32; our @ISA = qw(ExtUtils::MM_Win32); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm index f2114f9..c3e6453 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm @@ -3,7 +3,7 @@ package ExtUtils::MY; use strict; require ExtUtils::MM; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; our @ISA = qw(ExtUtils::MM); { diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm index fe95b27..d5a1dd7 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm @@ -24,7 +24,7 @@ my %Recognized_Att_Keys; our %macro_fsentity; # whether a macro is a filesystem name our %macro_dep; # whether a macro is a dependency -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; $VERSION = eval $VERSION; ## no critic [BuiltinFunctions::ProhibitStringyEval] # Emulate something resembling CVS $Revision$ diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm index 9001cc6..fe56648 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm @@ -2,7 +2,7 @@ package ExtUtils::MakeMaker::Config; use strict; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; use Config (); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm index 97d4300..3cbaf28 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm @@ -3,7 +3,7 @@ package ExtUtils::Mkbootstrap; # There's just too much Dynaloader incest here to turn on strict vars. use strict 'refs'; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; require Exporter; our @ISA = ('Exporter'); diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm index 3a9fc71..4ae9e73 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm @@ -10,7 +10,7 @@ use Config; our @ISA = qw(Exporter); our @EXPORT = qw(&Mksymlists); -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; sub Mksymlists { my(%spec) = @_; diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm index 2a5323e..fa7b73c 100644 --- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm +++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm @@ -3,7 +3,7 @@ package ExtUtils::testlib; use strict; use warnings; -our $VERSION = '7.04_01'; +our $VERSION = '7.04_02'; use Cwd; use File::Spec; diff --git a/cpan/File-Fetch/lib/File/Fetch.pm b/cpan/File-Fetch/lib/File/Fetch.pm index 7d6a263..de2ab12 100644 --- a/cpan/File-Fetch/lib/File/Fetch.pm +++ b/cpan/File-Fetch/lib/File/Fetch.pm @@ -22,7 +22,7 @@ use vars qw[ $VERBOSE $PREFER_BIN $FROM_EMAIL $USER_AGENT $FTP_PASSIVE $TIMEOUT $DEBUG $WARN $FORCEIPV4 ]; -$VERSION = '0.48'; +$VERSION = '0.48_01'; $VERSION = eval $VERSION; # avoid warnings with development releases $PREFER_BIN = 0; # XXX TODO implement $FROM_EMAIL = '[email protected]'; @@ -567,6 +567,8 @@ sub _lwp_fetch { }; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; unless( can_load( modules => $use_list ) ) { $METHOD_FAIL->{'lwp'} = 1; return; @@ -619,6 +621,8 @@ sub _httptiny_fetch { }; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; unless( can_load(modules => $use_list) ) { $METHOD_FAIL->{'httptiny'} = 1; return; @@ -658,6 +662,8 @@ sub _httplite_fetch { }; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; unless( can_load(modules => $use_list) ) { $METHOD_FAIL->{'httplite'} = 1; return; @@ -733,6 +739,8 @@ sub _iosock_fetch { 'IO::Select' => '0.0', }; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; unless( can_load(modules => $use_list) ) { $METHOD_FAIL->{'iosock'} = 1; return; @@ -814,6 +822,8 @@ sub _netftp_fetch { check( $tmpl, \%hash ) or return; ### required modules ### + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; my $use_list = { 'Net::FTP' => 0 }; unless( can_load( modules => $use_list ) ) { diff --git a/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm b/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm index 878cce8..e162e76 100644 --- a/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm +++ b/cpan/HTTP-Tiny/lib/HTTP/Tiny.pm @@ -4,7 +4,7 @@ use strict; use warnings; # ABSTRACT: A small, simple, correct HTTP/1.1 client -our $VERSION = '0.054'; +our $VERSION = '0.054_01'; use Carp (); @@ -1392,6 +1392,8 @@ sub _find_CA_file { return $self->{SSL_options}->{SSL_ca_file} if $self->{SSL_options}->{SSL_ca_file} and -e $self->{SSL_options}->{SSL_ca_file}; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; return Mozilla::CA::SSL_ca_file() if eval { require Mozilla::CA }; diff --git a/cpan/IO-Compress/bin/zipdetails b/cpan/IO-Compress/bin/zipdetails index 0249850..1b9c70a 100644 --- a/cpan/IO-Compress/bin/zipdetails +++ b/cpan/IO-Compress/bin/zipdetails @@ -5,6 +5,7 @@ # Display info on the contents of a Zip file # +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings ; diff --git a/cpan/IO-Compress/lib/Compress/Zlib.pm b/cpan/IO-Compress/lib/Compress/Zlib.pm index d197a34..7819833 100644 --- a/cpan/IO-Compress/lib/Compress/Zlib.pm +++ b/cpan/IO-Compress/lib/Compress/Zlib.pm @@ -17,7 +17,7 @@ use warnings ; use bytes ; our ($VERSION, $XS_VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; diff --git a/cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm b/cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm index 096c753..20fee96 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Adapter/Bzip2.pm @@ -9,7 +9,7 @@ use IO::Compress::Base::Common 2.068 qw(:Status); use Compress::Raw::Bzip2 2.068 ; our ($VERSION); -$VERSION = '2.068'; +$VERSION = '2.068_001'; sub mkCompObject { diff --git a/cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm b/cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm index a52b623..07cd82a 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Adapter/Deflate.pm @@ -10,7 +10,7 @@ use Compress::Raw::Zlib 2.068 qw( !crc32 !adler32 ) ; require Exporter; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, @EXPORT, %DEFLATE_CONSTANTS); -$VERSION = '2.068'; +$VERSION = '2.068_001'; @ISA = qw(Exporter); @EXPORT_OK = @Compress::Raw::Zlib::DEFLATE_CONSTANTS; %EXPORT_TAGS = %Compress::Raw::Zlib::DEFLATE_CONSTANTS; diff --git a/cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm b/cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm index b001abe..87cfaae 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Adapter/Identity.pm @@ -7,7 +7,7 @@ use bytes; use IO::Compress::Base::Common 2.068 qw(:Status); our ($VERSION); -$VERSION = '2.068'; +$VERSION = '2.068_001'; sub mkCompObject { diff --git a/cpan/IO-Compress/lib/IO/Compress/Base.pm b/cpan/IO-Compress/lib/IO/Compress/Base.pm index 20adb0e..b101b6f 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Base.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Base.pm @@ -20,7 +20,7 @@ use Symbol(); our (@ISA, $VERSION); @ISA = qw(Exporter IO::File); -$VERSION = '2.068'; +$VERSION = '2.068_001'; #Can't locate object method "SWASHNEW" via package "utf8" (perhaps you forgot to load "utf8"?) at .../ext/Compress-Zlib/Gzip/blib/lib/Compress/Zlib/Common.pm line 16. diff --git a/cpan/IO-Compress/lib/IO/Compress/Base/Common.pm b/cpan/IO-Compress/lib/IO/Compress/Base/Common.pm index 86bcaa6..cd33982 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Base/Common.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Base/Common.pm @@ -11,7 +11,7 @@ use File::GlobMapper; require Exporter; our ($VERSION, @ISA, @EXPORT, %EXPORT_TAGS, $HAS_ENCODE); @ISA = qw(Exporter); -$VERSION = '2.068'; +$VERSION = '2.068_001'; @EXPORT = qw( isaFilehandle isaFilename isaScalar whatIsInput whatIsOutput diff --git a/cpan/IO-Compress/lib/IO/Compress/Bzip2.pm b/cpan/IO-Compress/lib/IO/Compress/Bzip2.pm index d6c2d66..ddc1c56 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Bzip2.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Bzip2.pm @@ -14,7 +14,7 @@ use IO::Compress::Adapter::Bzip2 2.068 ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $Bzip2Error); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $Bzip2Error = ''; @ISA = qw(Exporter IO::Compress::Base); diff --git a/cpan/IO-Compress/lib/IO/Compress/Deflate.pm b/cpan/IO-Compress/lib/IO/Compress/Deflate.pm index 4b80953..1091e37 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Deflate.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Deflate.pm @@ -17,7 +17,7 @@ use IO::Compress::Base::Common 2.068 qw(); our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $DeflateError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $DeflateError = ''; @ISA = qw(Exporter IO::Compress::RawDeflate); diff --git a/cpan/IO-Compress/lib/IO/Compress/Gzip.pm b/cpan/IO-Compress/lib/IO/Compress/Gzip.pm index 01ee34e..6579319 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Gzip.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Gzip.pm @@ -25,7 +25,7 @@ BEGIN our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $GzipError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $GzipError = '' ; @ISA = qw(Exporter IO::Compress::RawDeflate); diff --git a/cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm b/cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm index 2b73a3c..f236fcb 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Gzip/Constants.pm @@ -9,7 +9,7 @@ require Exporter; our ($VERSION, @ISA, @EXPORT, %GZIP_OS_Names); our ($GZIP_FNAME_INVALID_CHAR_RE, $GZIP_FCOMMENT_INVALID_CHAR_RE); -$VERSION = '2.068'; +$VERSION = '2.068_001'; @ISA = qw(Exporter); diff --git a/cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm b/cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm index 2209952..60e07bb 100644 --- a/cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm +++ b/cpan/IO-Compress/lib/IO/Compress/RawDeflate.pm @@ -14,7 +14,7 @@ require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %DEFLATE_CONSTANTS, %EXPORT_TAGS, $RawDeflateError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $RawDeflateError = ''; @ISA = qw(Exporter IO::Compress::Base); diff --git a/cpan/IO-Compress/lib/IO/Compress/Zip.pm b/cpan/IO-Compress/lib/IO/Compress/Zip.pm index f8ec20c..9f2d873 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Zip.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Zip.pm @@ -36,7 +36,7 @@ require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $ZipError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $ZipError = ''; @ISA = qw(Exporter IO::Compress::RawDeflate); diff --git a/cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm b/cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm index bc56966..20b1b31 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Zip/Constants.pm @@ -7,7 +7,7 @@ require Exporter; our ($VERSION, @ISA, @EXPORT, %ZIP_CM_MIN_VERSIONS); -$VERSION = '2.068'; +$VERSION = '2.068_001'; @ISA = qw(Exporter); diff --git a/cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm b/cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm index f85364d..c569806 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Zlib/Constants.pm @@ -9,7 +9,7 @@ require Exporter; our ($VERSION, @ISA, @EXPORT); -$VERSION = '2.068'; +$VERSION = '2.068_001'; @ISA = qw(Exporter); diff --git a/cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm b/cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm index f99b9ed..6fee229 100644 --- a/cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm +++ b/cpan/IO-Compress/lib/IO/Compress/Zlib/Extra.pm @@ -8,7 +8,7 @@ use bytes; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS); -$VERSION = '2.068'; +$VERSION = '2.068_001'; use IO::Compress::Gzip::Constants 2.068 ; diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm index 0161b8f..c31cd10 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Bunzip2.pm @@ -9,7 +9,7 @@ use IO::Compress::Base::Common 2.068 qw(:Status); use Compress::Raw::Bzip2 2.068 ; our ($VERSION, @ISA); -$VERSION = '2.068'; +$VERSION = '2.068_001'; sub mkUncompObject { diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm index ecc66b9..1387a9c 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Identity.pm @@ -9,7 +9,7 @@ use IO::Compress::Zip::Constants ; our ($VERSION); -$VERSION = '2.068'; +$VERSION = '2.068_001'; use Compress::Raw::Zlib 2.068 (); diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm index 2cfe61e..5b7bc2e 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Adapter/Inflate.pm @@ -8,7 +8,7 @@ use IO::Compress::Base::Common 2.068 qw(:Status); use Compress::Raw::Zlib 2.068 qw(Z_OK Z_BUF_ERROR Z_STREAM_END Z_FINISH MAX_WBITS); our ($VERSION); -$VERSION = '2.068'; +$VERSION = '2.068_001'; diff --git a/cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm b/cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm index fd0bd69..020af25 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/AnyInflate.pm @@ -21,7 +21,7 @@ require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $AnyInflateError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $AnyInflateError = ''; @ISA = qw( Exporter IO::Uncompress::Base ); diff --git a/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm b/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm index 0d2568e..cec47cb 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/AnyUncompress.pm @@ -13,7 +13,7 @@ require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $AnyUncompressError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $AnyUncompressError = ''; @ISA = qw( Exporter IO::Uncompress::Base ); @@ -27,6 +27,8 @@ Exporter::export_ok_tags('all'); BEGIN { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; eval ' use IO::Uncompress::Adapter::Inflate 2.068 ;'; eval ' use IO::Uncompress::Adapter::Bunzip2 2.068 ;'; eval ' use IO::Uncompress::Adapter::LZO 2.068 ;'; diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Base.pm b/cpan/IO-Compress/lib/IO/Uncompress/Base.pm index 04348a2..dd521f5 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Base.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Base.pm @@ -9,7 +9,7 @@ our (@ISA, $VERSION, @EXPORT_OK, %EXPORT_TAGS); @ISA = qw(Exporter IO::File); -$VERSION = '2.068'; +$VERSION = '2.068_001'; use constant G_EOF => 0 ; use constant G_ERR => -1 ; diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm b/cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm index c6e7f46..157b110 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Bunzip2.pm @@ -12,7 +12,7 @@ use IO::Uncompress::Adapter::Bunzip2 2.068 ; require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $Bunzip2Error); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $Bunzip2Error = ''; @ISA = qw( Exporter IO::Uncompress::Base ); diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm b/cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm index 1f33f0b..8655b68 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Gunzip.pm @@ -28,7 +28,7 @@ Exporter::export_ok_tags('all'); $GunzipError = ''; -$VERSION = '2.068'; +$VERSION = '2.068_001'; sub new { diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm b/cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm index 1330731..fd6f551 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Inflate.pm @@ -13,7 +13,7 @@ use IO::Uncompress::RawInflate 2.068 ; require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $InflateError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $InflateError = ''; @ISA = qw( Exporter IO::Uncompress::RawInflate ); diff --git a/cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm b/cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm index 3a375a7..7b21821 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/RawInflate.pm @@ -14,7 +14,7 @@ use IO::Uncompress::Adapter::Inflate 2.068 ; require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, %DEFLATE_CONSTANTS, $RawInflateError); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $RawInflateError = ''; @ISA = qw( Exporter IO::Uncompress::Base ); diff --git a/cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm b/cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm index f73313f..132da90 100644 --- a/cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm +++ b/cpan/IO-Compress/lib/IO/Uncompress/Unzip.pm @@ -31,7 +31,7 @@ require Exporter ; our ($VERSION, @ISA, @EXPORT_OK, %EXPORT_TAGS, $UnzipError, %headerLookup); -$VERSION = '2.068'; +$VERSION = '2.068_001'; $UnzipError = ''; @ISA = qw(Exporter IO::Uncompress::RawInflate); diff --git a/cpan/IPC-Cmd/lib/IPC/Cmd.pm b/cpan/IPC-Cmd/lib/IPC/Cmd.pm index 6a82bdf..4705f04 100644 --- a/cpan/IPC-Cmd/lib/IPC/Cmd.pm +++ b/cpan/IPC-Cmd/lib/IPC/Cmd.pm @@ -18,7 +18,7 @@ BEGIN { $HAVE_MONOTONIC ]; - $VERSION = '0.92'; + $VERSION = '0.92_01'; $VERBOSE = 0; $DEBUG = 0; $WARN = 1; @@ -142,6 +142,8 @@ sub can_use_ipc_run { return if IS_WIN98; ### if we don't have ipc::run, we obviously can't use it. + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; return unless can_load( modules => { 'IPC::Run' => '0.55' }, verbose => ($WARN && $verbose), @@ -169,6 +171,8 @@ sub can_use_ipc_open3 { ### IPC::Open3 works on every non-VMS platform, but it can't ### capture buffers on win32 :( + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; return unless can_load( modules => { map {$_ => '0.0'} qw|IPC::Open3 IO::Select Symbol| }, verbose => ($WARN && $verbose), diff --git a/cpan/JSON-PP/bin/json_pp b/cpan/JSON-PP/bin/json_pp index df9d243..896cd2f 100644 --- a/cpan/JSON-PP/bin/json_pp +++ b/cpan/JSON-PP/bin/json_pp @@ -1,5 +1,6 @@ #!/usr/bin/perl +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use Getopt::Long; diff --git a/cpan/JSON-PP/lib/JSON/PP.pm b/cpan/JSON-PP/lib/JSON/PP.pm index 7a011a4..1e29eee 100644 --- a/cpan/JSON-PP/lib/JSON/PP.pm +++ b/cpan/JSON-PP/lib/JSON/PP.pm @@ -11,7 +11,7 @@ use Carp (); use B (); #use Devel::Peek; -$JSON::PP::VERSION = '2.27300'; +$JSON::PP::VERSION = '2.27300_01'; @JSON::PP::EXPORT = qw(encode_json decode_json from_json to_json); diff --git a/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm b/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm index 30760f3..9e61670 100644 --- a/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm +++ b/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm @@ -1,5 +1,5 @@ package Locale::Maketext::Simple; -$Locale::Maketext::Simple::VERSION = '0.21'; +$Locale::Maketext::Simple::VERSION = '0.21_01'; use strict; use 5.005; @@ -134,7 +134,12 @@ sub load_loc { my $pkg = join('::', grep { defined and length } $args{Class}, $args{Subclass}); return $Loc{$pkg} if exists $Loc{$pkg}; - eval { require Locale::Maketext::Lexicon; 1 } or return; + eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require Locale::Maketext::Lexicon; + 1 + } or return; $Locale::Maketext::Lexicon::VERSION > 0.20 or return; eval { require File::Spec; 1 } or return; diff --git a/cpan/Memoize/Memoize.pm b/cpan/Memoize/Memoize.pm index 9a58c4a..f4e6522 100644 --- a/cpan/Memoize/Memoize.pm +++ b/cpan/Memoize/Memoize.pm @@ -9,7 +9,7 @@ # write to [email protected] for a license. package Memoize; -$VERSION = '1.03'; +$VERSION = '1.03_01'; # Compile-time constants sub SCALAR () { 0 } @@ -184,7 +184,11 @@ sub _my_tie { } my $modulefile = $module . '.pm'; $modulefile =~ s{::}{/}g; - eval { require $modulefile }; + eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require $modulefile + }; if ($@) { croak "Memoize: Couldn't load hash tie module `$module': $@; aborting"; } diff --git a/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm b/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm index 969019d..52ae015 100644 --- a/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm +++ b/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm @@ -12,7 +12,7 @@ use File::Spec::Functions qw(catfile catdir splitdir); use vars qw($VERSION @Pagers $Bindir $Pod2man $Temp_Files_Created $Temp_File_Lifetime ); -$VERSION = '3.25'; +$VERSION = '3.25_01'; #.......................................................................... @@ -573,6 +573,9 @@ sub find_good_formatter_class { my @class_list = @{ $self->{'formatter_classes'} || [] }; $self->die( "WHAT? Nothing in the formatter class list!?" ) unless @class_list; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + my $good_class_found; foreach my $c (@class_list) { DEBUG > 4 and print "Trying to load $c...\n"; @@ -1004,6 +1007,8 @@ sub new_translator { # $tr = $self->new_translator($lang); my $self = shift; my $lang = shift; + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; my $pack = 'POD2::' . uc($lang); eval "require $pack"; if ( !$@ && $pack->can('new') ) { diff --git a/cpan/Sys-Syslog/Syslog.pm b/cpan/Sys-Syslog/Syslog.pm index 25164af..28f36c7 100644 --- a/cpan/Sys-Syslog/Syslog.pm +++ b/cpan/Sys-Syslog/Syslog.pm @@ -11,7 +11,7 @@ require 5.005; { no strict 'vars'; - $VERSION = '0.33'; + $VERSION = '0.33_01'; %EXPORT_TAGS = ( standard => [qw(openlog syslog closelog setlogmask)], @@ -888,6 +888,8 @@ sub silent_eval (&) { sub can_load { my ($module, $verbose) = @_; local($SIG{__DIE__}, $SIG{__WARN__}, $@); + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; my $loaded = eval "use $module; 1"; warn $@ if not $loaded and $verbose; return $loaded diff --git a/cpan/Test-Harness/bin/prove b/cpan/Test-Harness/bin/prove index 6637cc4..d71b238 100644 --- a/cpan/Test-Harness/bin/prove +++ b/cpan/Test-Harness/bin/prove @@ -1,5 +1,6 @@ #!/usr/bin/perl -w +BEGIN { pop @INC if $INC[-1] eq '.' } use strict; use warnings; use App::Prove; diff --git a/cpan/Test-Harness/lib/App/Prove.pm b/cpan/Test-Harness/lib/App/Prove.pm index 4608978..f81a4ae 100644 --- a/cpan/Test-Harness/lib/App/Prove.pm +++ b/cpan/Test-Harness/lib/App/Prove.pm @@ -22,7 +22,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/App/Prove/State.pm b/cpan/Test-Harness/lib/App/Prove/State.pm index 0e237d5..36a231f 100644 --- a/cpan/Test-Harness/lib/App/Prove/State.pm +++ b/cpan/Test-Harness/lib/App/Prove/State.pm @@ -29,7 +29,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/App/Prove/State/Result.pm b/cpan/Test-Harness/lib/App/Prove/State/Result.pm index 6725c5a..e165b0f 100644 --- a/cpan/Test-Harness/lib/App/Prove/State/Result.pm +++ b/cpan/Test-Harness/lib/App/Prove/State/Result.pm @@ -18,7 +18,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/App/Prove/State/Result/Test.pm b/cpan/Test-Harness/lib/App/Prove/State/Result/Test.pm index a776f8f..8ed13ad 100644 --- a/cpan/Test-Harness/lib/App/Prove/State/Result/Test.pm +++ b/cpan/Test-Harness/lib/App/Prove/State/Result/Test.pm @@ -13,7 +13,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Base.pm b/cpan/Test-Harness/lib/TAP/Base.pm index 61c567f..e0ba8e0 100644 --- a/cpan/Test-Harness/lib/TAP/Base.pm +++ b/cpan/Test-Harness/lib/TAP/Base.pm @@ -16,7 +16,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; use constant GOT_TIME_HIRES => do { eval 'use Time::HiRes qw(time);'; diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Base.pm b/cpan/Test-Harness/lib/TAP/Formatter/Base.pm index a5a78d1..f5254cf 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Base.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Base.pm @@ -62,7 +62,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Color.pm b/cpan/Test-Harness/lib/TAP/Formatter/Color.pm index 76937b0..d4d1116 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Color.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Color.pm @@ -75,7 +75,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Console.pm b/cpan/Test-Harness/lib/TAP/Formatter/Console.pm index 01f1a54..3ca4d95 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Console.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Console.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Console/ParallelSession.pm b/cpan/Test-Harness/lib/TAP/Formatter/Console/ParallelSession.pm index 9c4b9cf..6c67c29 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Console/ParallelSession.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Console/ParallelSession.pm @@ -45,7 +45,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Console/Session.pm b/cpan/Test-Harness/lib/TAP/Formatter/Console/Session.pm index 672a083..b741d68 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Console/Session.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Console/Session.pm @@ -30,7 +30,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/File.pm b/cpan/Test-Harness/lib/TAP/Formatter/File.pm index 8ee90fc..f7b8af3 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/File.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/File.pm @@ -17,7 +17,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/File/Session.pm b/cpan/Test-Harness/lib/TAP/Formatter/File/Session.pm index 2a92d60..607029c 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/File/Session.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/File/Session.pm @@ -14,7 +14,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Formatter/Session.pm b/cpan/Test-Harness/lib/TAP/Formatter/Session.pm index 089c1e6..f0b94f9 100644 --- a/cpan/Test-Harness/lib/TAP/Formatter/Session.pm +++ b/cpan/Test-Harness/lib/TAP/Formatter/Session.pm @@ -27,7 +27,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 METHODS diff --git a/cpan/Test-Harness/lib/TAP/Harness.pm b/cpan/Test-Harness/lib/TAP/Harness.pm index d9ede6b..53b8e25 100644 --- a/cpan/Test-Harness/lib/TAP/Harness.pm +++ b/cpan/Test-Harness/lib/TAP/Harness.pm @@ -20,7 +20,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; $ENV{HARNESS_ACTIVE} = 1; $ENV{HARNESS_VERSION} = $VERSION; diff --git a/cpan/Test-Harness/lib/TAP/Harness/Env.pm b/cpan/Test-Harness/lib/TAP/Harness/Env.pm index c565b13..dd6bc32 100644 --- a/cpan/Test-Harness/lib/TAP/Harness/Env.pm +++ b/cpan/Test-Harness/lib/TAP/Harness/Env.pm @@ -7,7 +7,7 @@ use constant IS_VMS => ( $^O eq 'VMS' ); use TAP::Object; use Text::ParseWords qw/shellwords/; -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; # Get the parts of @INC which are changed from the stock list AND # preserve reordering of stock directories. diff --git a/cpan/Test-Harness/lib/TAP/Object.pm b/cpan/Test-Harness/lib/TAP/Object.pm index 84dfe88..948395a 100644 --- a/cpan/Test-Harness/lib/TAP/Object.pm +++ b/cpan/Test-Harness/lib/TAP/Object.pm @@ -13,7 +13,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser.pm b/cpan/Test-Harness/lib/TAP/Parser.pm index 22222c2..8b64f0f 100644 --- a/cpan/Test-Harness/lib/TAP/Parser.pm +++ b/cpan/Test-Harness/lib/TAP/Parser.pm @@ -31,7 +31,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; my $DEFAULT_TAP_VERSION = 12; my $MAX_TAP_VERSION = 13; diff --git a/cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm b/cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm index 5745245..93042be 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Aggregator.pm @@ -16,7 +16,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Grammar.pm b/cpan/Test-Harness/lib/TAP/Parser/Grammar.pm index 1a0be3c..a978e77 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Grammar.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Grammar.pm @@ -18,7 +18,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Iterator.pm b/cpan/Test-Harness/lib/TAP/Parser/Iterator.pm index 114aba6..18a5104 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Iterator.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Iterator.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm index 650adbf..baa2635 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Array.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Process.pm b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Process.pm index 923de9a..ef40ba6 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Process.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Process.pm @@ -20,7 +20,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Stream.pm b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Stream.pm index bd6a8b7..b90770e 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Iterator/Stream.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Iterator/Stream.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/IteratorFactory.pm b/cpan/Test-Harness/lib/TAP/Parser/IteratorFactory.pm index d4e29ff..5681465 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/IteratorFactory.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/IteratorFactory.pm @@ -20,7 +20,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm b/cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm index d002272..ca0504a 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Multiplexer.pm @@ -21,7 +21,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Result.pm b/cpan/Test-Harness/lib/TAP/Parser/Result.pm index efbcfe8..f8a31a3 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Result.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Result.pm @@ -28,7 +28,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 SYNOPSIS diff --git a/cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm b/cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm index c374986..22cf456 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Result/Bailout.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm b/cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm index bd0f78a..ab9973f 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Result/Comment.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm b/cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm index 900874a..007d2d5 100644 --- a/cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm +++ b/cpan/Test-Harness/lib/TAP/Parser/Result/Plan.pm @@ -15,7 +15,7 @@ Version 3.35 =cut -our $VERSION = '3.35'; +our $VERSION = '3.35_01'; =head1 DESCRIPTION diff --git a/cpan/Test-Harness/lib/TAP/Parser/Result/Pragma.pm b/cpan/Test-Harness/lib/TAP/Parser/Result/Pragma.pm **** PATCH TRUNCATED AT 2000 LINES -- 1690 NOT SHOWN **** -- Perl5 Master Repository
