Index: gnu/usr.bin/perl/INSTALL =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/INSTALL,v retrieving revision 1.19 diff -u -p -r1.19 INSTALL --- gnu/usr.bin/perl/INSTALL 5 Feb 2017 00:31:51 -0000 1.19 +++ gnu/usr.bin/perl/INSTALL 11 Aug 2017 22:39:12 -0000 @@ -581,7 +581,7 @@ The directories set up by Configure fall =item Directories for the perl distribution -By default, Configure will use the following directories for 5.24.1. +By default, Configure will use the following directories for 5.24.2. $version is the full perl version number, including subversion, e.g. 5.12.3, and $archname is a string like sun4-sunos, determined by Configure. The full definitions of all Configure @@ -2437,7 +2437,7 @@ http://www.chiark.greenend.org.uk/~sgtat =head1 Coexistence with earlier versions of perl 5 -Perl 5.24.1 is not binary compatible with earlier versions of Perl. +Perl 5.24.2 is not binary compatible with earlier versions of Perl. In other words, you will have to recompile your XS modules. In general, you can usually safely upgrade from one version of Perl @@ -2512,9 +2512,9 @@ won't interfere with another version. ( libraries after 5.6.0, but not for executables. TODO?) One convenient way to do this is by using a separate prefix for each version, such as - sh Configure -Dprefix=/opt/perl5.24.1 + sh Configure -Dprefix=/opt/perl5.24.2 -and adding /opt/perl5.24.1/bin to the shell PATH variable. Such users +and adding /opt/perl5.24.2/bin to the shell PATH variable. Such users may also wish to add a symbolic link /usr/local/bin/perl so that scripts can still start with #!/usr/local/bin/perl. @@ -2529,11 +2529,11 @@ yet. =head2 Upgrading from v5.22 or earlier -B Perl modules having binary parts (meaning that a C compiler is used) will have to be recompiled to be -used with 5.24.1. If you find you do need to rebuild an extension with -5.24.1, you may safely do so without disturbing the older +used with 5.24.2. If you find you do need to rebuild an extension with +5.24.2, you may safely do so without disturbing the older installations. (See L<"Coexistence with earlier versions of perl 5"> above.) @@ -2566,15 +2566,15 @@ Firstly, the bare minimum to run this sc print("$f\n"); } -in Linux with perl-5.24.1 is as follows (under $Config{prefix}): +in Linux with perl-5.24.2 is as follows (under $Config{prefix}): ./bin/perl - ./lib/perl5/5.24.1/strict.pm - ./lib/perl5/5.24.1/warnings.pm - ./lib/perl5/5.24.1/i686-linux/File/Glob.pm - ./lib/perl5/5.24.1/feature.pm - ./lib/perl5/5.24.1/XSLoader.pm - ./lib/perl5/5.24.1/i686-linux/auto/File/Glob/Glob.so + ./lib/perl5/5.24.2/strict.pm + ./lib/perl5/5.24.2/warnings.pm + ./lib/perl5/5.24.2/i686-linux/File/Glob.pm + ./lib/perl5/5.24.2/feature.pm + ./lib/perl5/5.24.2/XSLoader.pm + ./lib/perl5/5.24.2/i686-linux/auto/File/Glob/Glob.so Secondly, for perl-5.10.1, the Debian perl-base package contains 591 files, (of which 510 are for lib/unicore) totaling about 3.5MB in its Index: gnu/usr.bin/perl/MANIFEST =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/MANIFEST,v retrieving revision 1.42 diff -u -p -r1.42 MANIFEST --- gnu/usr.bin/perl/MANIFEST 5 Feb 2017 00:34:32 -0000 1.42 +++ gnu/usr.bin/perl/MANIFEST 11 Aug 2017 22:39:12 -0000 @@ -3027,10 +3027,9 @@ dist/base/t/fields-5_8_0.t See if fields dist/base/t/fields-base.t See if fields work dist/base/t/fields.t See if fields work dist/base/t/incdot.t Test how base.pm handles '.' in @INC -dist/base/t/incmodified-vs-incdot.t Test base.pm's @INC fiddling dist/base/t/isa.t See if base's behaviour doesn't change -dist/base/t/lib/BaseIncDoubleExtender.pm Test module for base.pm -dist/base/t/lib/BaseIncExtender.pm Test module for base.pm +dist/base/t/lib/BaseIncMandatory.pm Test module for base.pm +dist/base/t/lib/BaseIncOptional.pm Test module for base.pm dist/base/t/lib/Broken.pm Test module for base.pm dist/base/t/lib/Dummy.pm Test module for base.pm dist/base/t/lib/HasSigDie.pm Module for testing base.pm @@ -5127,7 +5126,9 @@ pod/perl5203delta.pod Perl changes in v pod/perl5220delta.pod Perl changes in version 5.22.0 pod/perl5221delta.pod Perl changes in version 5.22.1 pod/perl5222delta.pod Perl changes in version 5.22.2 +pod/perl5223delta.pod Perl changes in version 5.22.3 pod/perl5240delta.pod Perl changes in version 5.24.0 +pod/perl5241delta.pod Perl changes in version 5.24.1 pod/perl561delta.pod Perl changes in version 5.6.1 pod/perl56delta.pod Perl changes in version 5.6 pod/perl581delta.pod Perl changes in version 5.8.1 Index: gnu/usr.bin/perl/META.json =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/META.json,v retrieving revision 1.3 diff -u -p -r1.3 META.json --- gnu/usr.bin/perl/META.json 5 Feb 2017 00:31:52 -0000 1.3 +++ gnu/usr.bin/perl/META.json 11 Aug 2017 22:39:12 -0000 @@ -124,6 +124,6 @@ "url" : "http://perl5.git.perl.org/" } }, - "version" : "5.024001", + "version" : "5.024002", "x_serialization_backend" : "JSON::PP version 2.27300_01" } Index: gnu/usr.bin/perl/META.yml =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/META.yml,v retrieving revision 1.3 diff -u -p -r1.3 META.yml --- gnu/usr.bin/perl/META.yml 5 Feb 2017 00:31:52 -0000 1.3 +++ gnu/usr.bin/perl/META.yml 11 Aug 2017 22:39:12 -0000 @@ -111,5 +111,5 @@ resources: homepage: http://www.perl.org/ license: http://dev.perl.org/licenses/ repository: http://perl5.git.perl.org/ -version: '5.024001' +version: '5.024002' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' Index: gnu/usr.bin/perl/Makefile.SH =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Makefile.SH,v retrieving revision 1.36 diff -u -p -r1.36 Makefile.SH --- gnu/usr.bin/perl/Makefile.SH 5 Feb 2017 00:34:32 -0000 1.36 +++ gnu/usr.bin/perl/Makefile.SH 11 Aug 2017 22:39:12 -0000 @@ -522,7 +522,7 @@ miniperl_objs = $(miniperl_objs_nodt) $( perllib_objs = $(perllib_objs_nodt) $(DTRACE_PERLLIB_O) perlmain_objs = perlmain$(OBJ_EXT) $(DTRACE_MAIN_O) -perltoc_pod_prereqs = extra.pods pod/perl5241delta.pod pod/perlapi.pod pod/perlintern.pod pod/perlmodlib.pod +perltoc_pod_prereqs = extra.pods pod/perl5242delta.pod pod/perlapi.pod pod/perlintern.pod pod/perlmodlib.pod generated_pods = pod/perltoc.pod $(perltoc_pod_prereqs) generated_headers = uudmap.h bitcount.h mg_data.h @@ -1079,9 +1079,9 @@ pod/perlintern.pod: $(MINIPERL_EXE) auto pod/perlmodlib.pod: $(MINIPERL_EXE) pod/perlmodlib.PL MANIFEST $(MINIPERL) pod/perlmodlib.PL -q -pod/perl5241delta.pod: pod/perldelta.pod - $(RMS) pod/perl5241delta.pod - $(LNS) perldelta.pod pod/perl5241delta.pod +pod/perl5242delta.pod: pod/perldelta.pod + $(RMS) pod/perl5242delta.pod + $(LNS) perldelta.pod pod/perl5242delta.pod extra.pods: $(MINIPERL_EXE) -@test ! -f extra.pods || rm -f `cat extra.pods` Index: gnu/usr.bin/perl/README.haiku =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/README.haiku,v retrieving revision 1.3 diff -u -p -r1.3 README.haiku --- gnu/usr.bin/perl/README.haiku 5 Feb 2017 00:31:52 -0000 1.3 +++ gnu/usr.bin/perl/README.haiku 11 Aug 2017 22:39:12 -0000 @@ -22,9 +22,9 @@ The build procedure is completely standa Make perl executable and create a symlink for libperl: chmod a+x /boot/common/bin/perl - cd /boot/common/lib; ln -s perl5/5.24.1/BePC-haiku/CORE/libperl.so . + cd /boot/common/lib; ln -s perl5/5.24.2/BePC-haiku/CORE/libperl.so . -Replace C<5.24.1> with your respective version of Perl. +Replace C<5.24.2> with your respective version of Perl. =head1 KNOWN PROBLEMS Index: gnu/usr.bin/perl/README.macosx =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/README.macosx,v retrieving revision 1.3 diff -u -p -r1.3 README.macosx --- gnu/usr.bin/perl/README.macosx 5 Feb 2017 00:31:52 -0000 1.3 +++ gnu/usr.bin/perl/README.macosx 11 Aug 2017 22:39:12 -0000 @@ -10,9 +10,9 @@ perlmacosx - Perl under Mac OS X This document briefly describes Perl under Mac OS X. - curl -O http://www.cpan.org/src/perl-5.24.1.tar.gz - tar -xzf perl-5.24.1.tar.gz - cd perl-5.24.1 + curl -O http://www.cpan.org/src/perl-5.24.2.tar.gz + tar -xzf perl-5.24.2.tar.gz + cd perl-5.24.2 ./Configure -des -Dprefix=/usr/local/ make make test @@ -20,7 +20,7 @@ This document briefly describes Perl und =head1 DESCRIPTION -The latest Perl release (5.24.1 as of this writing) builds without changes +The latest Perl release (5.24.2 as of this writing) builds without changes under all versions of Mac OS X from 10.3 "Panther" onwards. In order to build your own version of Perl you will need 'make', Index: gnu/usr.bin/perl/README.os2 =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/README.os2,v retrieving revision 1.19 diff -u -p -r1.19 README.os2 --- gnu/usr.bin/perl/README.os2 5 Feb 2017 00:31:52 -0000 1.19 +++ gnu/usr.bin/perl/README.os2 11 Aug 2017 22:39:13 -0000 @@ -619,7 +619,7 @@ C in F, =item Additional Perl modules - unzip perl_ste.zip -d f:/perllib/lib/site_perl/5.24.1/ + unzip perl_ste.zip -d f:/perllib/lib/site_perl/5.24.2/ Same remark as above applies. Additionally, if this directory is not one of directories on @INC (and @INC is influenced by C), you Index: gnu/usr.bin/perl/README.vms =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/README.vms,v retrieving revision 1.20 diff -u -p -r1.20 README.vms --- gnu/usr.bin/perl/README.vms 5 Feb 2017 00:31:52 -0000 1.20 +++ gnu/usr.bin/perl/README.vms 11 Aug 2017 22:39:13 -0000 @@ -142,11 +142,11 @@ You may need to set up a foreign symbol choice. Once you have done so, use a command like the following to unpack the archive: - vmstar -xvf perl-5^.24^.1.tar + vmstar -xvf perl-5^.24^.2.tar Then set default to the top-level source directory like so: - set default [.perl-5^.24^.1] + set default [.perl-5^.24^.2] and proceed with configuration as described in the next section. Index: gnu/usr.bin/perl/embed.fnc =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/embed.fnc,v retrieving revision 1.3 diff -u -p -r1.3 embed.fnc --- gnu/usr.bin/perl/embed.fnc 5 Feb 2017 00:31:52 -0000 1.3 +++ gnu/usr.bin/perl/embed.fnc 11 Aug 2017 22:39:13 -0000 @@ -344,6 +344,10 @@ Ap |I32 |debstackptrs pR |SV * |defelem_target |NN SV *sv|NULLOK MAGIC *mg Anp |char* |delimcpy |NN char* to|NN const char* toend|NN const char* from \ |NN const char* fromend|int delim|NN I32* retlen +np |char* |delimcpy_no_escape|NN char* to|NN const char* toend \ + |NN const char* from \ + |NN const char* fromend|int delim \ + |NN I32* retlen : Used in op.c, perl.c pM |void |delete_eval_scope Aprd |OP* |die_sv |NN SV *baseex Index: gnu/usr.bin/perl/embed.h =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/embed.h,v retrieving revision 1.19 diff -u -p -r1.19 embed.h --- gnu/usr.bin/perl/embed.h 5 Feb 2017 00:31:52 -0000 1.19 +++ gnu/usr.bin/perl/embed.h 11 Aug 2017 22:39:13 -0000 @@ -1206,6 +1206,7 @@ #define deb_stack_all() Perl_deb_stack_all(aTHX) #define defelem_target(a,b) Perl_defelem_target(aTHX_ a,b) #define delete_eval_scope() Perl_delete_eval_scope(aTHX) +#define delimcpy_no_escape Perl_delimcpy_no_escape #define die_unwind(a) Perl_die_unwind(aTHX_ a) #define do_aexec5(a,b,c,d,e) Perl_do_aexec5(aTHX_ a,b,c,d,e) #define do_dump_pad(a,b,c,d) Perl_do_dump_pad(aTHX_ a,b,c,d) Index: gnu/usr.bin/perl/mg.c =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/mg.c,v retrieving revision 1.22 diff -u -p -r1.22 mg.c --- gnu/usr.bin/perl/mg.c 5 Feb 2017 00:31:52 -0000 1.22 +++ gnu/usr.bin/perl/mg.c 11 Aug 2017 22:39:13 -0000 @@ -1259,7 +1259,7 @@ Perl_magic_setenv(pTHX_ SV *sv, MAGIC *m #else const char path_sep = ':'; #endif - s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, + s = delimcpy_no_escape(tmpbuf, tmpbuf + sizeof tmpbuf, s, strend, path_sep, &i); s++; if (i >= (I32)sizeof tmpbuf /* too long -- assume the worst */ Index: gnu/usr.bin/perl/patchlevel.h =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/patchlevel.h,v retrieving revision 1.43 diff -u -p -r1.43 patchlevel.h --- gnu/usr.bin/perl/patchlevel.h 5 Feb 2017 00:31:53 -0000 1.43 +++ gnu/usr.bin/perl/patchlevel.h 11 Aug 2017 22:39:13 -0000 @@ -15,7 +15,7 @@ #define PERL_REVISION 5 /* age */ #define PERL_VERSION 24 /* epoch */ -#define PERL_SUBVERSION 1 /* generation */ +#define PERL_SUBVERSION 2 /* generation */ /* The following numbers describe the earliest compatible version of Perl ("compatibility" here being defined as sufficient binary/API Index: gnu/usr.bin/perl/proto.h =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/proto.h,v retrieving revision 1.19 diff -u -p -r1.19 proto.h --- gnu/usr.bin/perl/proto.h 5 Feb 2017 00:31:53 -0000 1.19 +++ gnu/usr.bin/perl/proto.h 11 Aug 2017 22:39:13 -0000 @@ -659,6 +659,9 @@ PERL_CALLCONV void Perl_delete_eval_scop PERL_CALLCONV char* Perl_delimcpy(char* to, const char* toend, const char* from, const char* fromend, int delim, I32* retlen); #define PERL_ARGS_ASSERT_DELIMCPY \ assert(to); assert(toend); assert(from); assert(fromend); assert(retlen) +PERL_CALLCONV char* Perl_delimcpy_no_escape(char* to, const char* toend, const char* from, const char* fromend, int delim, I32* retlen); +#define PERL_ARGS_ASSERT_DELIMCPY_NO_ESCAPE \ + assert(to); assert(toend); assert(from); assert(fromend); assert(retlen) PERL_CALLCONV void Perl_despatch_signals(pTHX); PERL_CALLCONV_NO_RET OP* Perl_die(pTHX_ const char* pat, ...) __attribute__noreturn__ Index: gnu/usr.bin/perl/regexec.c =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/regexec.c,v retrieving revision 1.21 diff -u -p -r1.21 regexec.c --- gnu/usr.bin/perl/regexec.c 5 Feb 2017 00:31:53 -0000 1.21 +++ gnu/usr.bin/perl/regexec.c 11 Aug 2017 22:39:14 -0000 @@ -6191,23 +6191,26 @@ S_regmatch(pTHX_ regmatch_info *reginfo, if (! (to_complement ^ cBOOL(isFOO_lc(FLAGS(scan), (U8) nextchr)))) { sayNO; } + + locinput++; + break; } - else if (UTF8_IS_DOWNGRADEABLE_START(nextchr)) { - if (! (to_complement ^ cBOOL(isFOO_lc(FLAGS(scan), - EIGHT_BIT_UTF8_TO_NATIVE(nextchr, - *(locinput + 1)))))) - { - sayNO; - } - } - else { /* Here, must be an above Latin-1 code point */ + + if (! UTF8_IS_DOWNGRADEABLE_START(nextchr)) { /* An above Latin-1 code point */ _CHECK_AND_OUTPUT_WIDE_LOCALE_UTF8_MSG(locinput, reginfo->strend); goto utf8_posix_above_latin1; } - /* Here, must be utf8 */ - locinput += UTF8SKIP(locinput); - break; + /* Here is a UTF-8 variant code point below 256 and the target is + * UTF-8 */ + if (! (to_complement ^ cBOOL(isFOO_lc(FLAGS(scan), + EIGHT_BIT_UTF8_TO_NATIVE(nextchr, + *(locinput + 1)))))) + { + sayNO; + } + + goto increment_locinput; case NPOSIXD: /* \W or [:^punct:] etc. under /d */ to_complement = 1; Index: gnu/usr.bin/perl/shlib_version =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/shlib_version,v retrieving revision 1.20 diff -u -p -r1.20 shlib_version --- gnu/usr.bin/perl/shlib_version 5 Feb 2017 00:33:38 -0000 1.20 +++ gnu/usr.bin/perl/shlib_version 11 Aug 2017 22:39:14 -0000 @@ -1,2 +1,2 @@ major=18 -minor=0 +minor=1 Index: gnu/usr.bin/perl/util.c =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/util.c,v retrieving revision 1.26 diff -u -p -r1.26 util.c --- gnu/usr.bin/perl/util.c 5 Feb 2017 00:33:38 -0000 1.26 +++ gnu/usr.bin/perl/util.c 11 Aug 2017 22:39:14 -0000 @@ -524,15 +524,17 @@ Free_t Perl_mfree (Malloc_t where) /* copy a string up to some (non-backslashed) delimiter, if any */ -char * -Perl_delimcpy(char *to, const char *toend, const char *from, const char *fromend, int delim, I32 *retlen) +static char * +S_delimcpy(char *to, const char *toend, const char *from, + const char *fromend, int delim, I32 *retlen, + const bool allow_escape) { I32 tolen; PERL_ARGS_ASSERT_DELIMCPY; for (tolen = 0; from < fromend; from++, tolen++) { - if (*from == '\\') { + if (allow_escape && *from == '\\') { if (from[1] != delim) { if (to < toend) *to++ = *from; @@ -549,6 +551,23 @@ Perl_delimcpy(char *to, const char *toen *to = '\0'; *retlen = tolen; return (char *)from; +} + +char * +Perl_delimcpy(char *to, const char *toend, const char *from, const char *fromend, int delim, I32 *retlen) +{ + PERL_ARGS_ASSERT_DELIMCPY; + + return S_delimcpy(to, toend, from, fromend, delim, retlen, 1); +} + +char * +Perl_delimcpy_no_escape(char *to, const char *toend, const char *from, + const char *fromend, int delim, I32 *retlen) +{ + PERL_ARGS_ASSERT_DELIMCPY_NO_ESCAPE; + + return S_delimcpy(to, toend, from, fromend, delim, retlen, 0); } /* return ptr to little string in big string, NULL if not found */ Index: gnu/usr.bin/perl/Cross/config.sh-arm-linux =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Cross/config.sh-arm-linux,v retrieving revision 1.6 diff -u -p -r1.6 config.sh-arm-linux --- gnu/usr.bin/perl/Cross/config.sh-arm-linux 5 Feb 2017 00:31:54 -0000 1.6 +++ gnu/usr.bin/perl/Cross/config.sh-arm-linux 11 Aug 2017 22:39:14 -0000 @@ -36,8 +36,8 @@ api_subversion='0' api_version='24' api_versionstring='5.24.0' ar='ar' -archlib='/usr/lib/perl5/5.24.1/armv4l-linux' -archlibexp='/usr/lib/perl5/5.24.1/armv4l-linux' +archlib='/usr/lib/perl5/5.24.2/armv4l-linux' +archlibexp='/usr/lib/perl5/5.24.2/armv4l-linux' archname64='' archname='armv4l-linux' archobjs='' @@ -56,7 +56,7 @@ castflags='0' cat='cat' cc='cc' cccdlflags='-fpic' -ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5/5.24.1/armv4l-linux/CORE' +ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5/5.24.2/armv4l-linux/CORE' ccflags='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccflags_uselargefiles='-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccname='arm-linux-gcc' @@ -808,7 +808,7 @@ inc_version_list=' ' inc_version_list_init='0' incpath='' inews='' -installarchlib='./install_me_here/usr/lib/perl5/5.24.1/armv4l-linux' +installarchlib='./install_me_here/usr/lib/perl5/5.24.2/armv4l-linux' installbin='./install_me_here/usr/bin' installhtml1dir='' installhtml3dir='' @@ -816,13 +816,13 @@ installman1dir='./install_me_here/usr/sh installman3dir='./install_me_here/usr/share/man/man3' installprefix='./install_me_here/usr' installprefixexp='./install_me_here/usr' -installprivlib='./install_me_here/usr/lib/perl5/5.24.1' +installprivlib='./install_me_here/usr/lib/perl5/5.24.2' installscript='./install_me_here/usr/bin' -installsitearch='./install_me_here/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' +installsitearch='./install_me_here/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' installsitebin='./install_me_here/usr/bin' installsitehtml1dir='' installsitehtml3dir='' -installsitelib='./install_me_here/usr/lib/perl5/site_perl/5.24.1' +installsitelib='./install_me_here/usr/lib/perl5/site_perl/5.24.2' installsiteman1dir='./install_me_here/usr/share/man/man1' installsiteman3dir='./install_me_here/usr/share/man/man3' installsitescript='./install_me_here/usr/bin' @@ -956,8 +956,8 @@ pmake='' pr='' prefix='/usr' prefixexp='/usr' -privlib='/usr/lib/perl5/5.24.1' -privlibexp='/usr/lib/perl5/5.24.1' +privlib='/usr/lib/perl5/5.24.2' +privlibexp='/usr/lib/perl5/5.24.2' procselfexe='"/proc/self/exe"' prototype='define' ptrsize='4' @@ -1022,17 +1022,17 @@ sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 6, 17, 29, 31, 0' sig_size='68' signal_t='void' -sitearch='/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' -sitearchexp='/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' +sitearch='/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' +sitearchexp='/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' sitebin='/usr/bin' sitebinexp='/usr/bin' sitehtml1dir='' sitehtml1direxp='' sitehtml3dir='' sitehtml3direxp='' -sitelib='/usr/lib/perl5/site_perl/5.24.1' +sitelib='/usr/lib/perl5/site_perl/5.24.2' sitelib_stem='/usr/lib/perl5/site_perl' -sitelibexp='/usr/lib/perl5/site_perl/5.24.1' +sitelibexp='/usr/lib/perl5/site_perl/5.24.2' siteman1dir='/usr/share/man/man1' siteman1direxp='/usr/share/man/man1' siteman3dir='/usr/share/man/man3' @@ -1071,7 +1071,7 @@ stdio_stream_array='' strerror_r_proto='0' strings='/usr/include/string.h' submit='' -subversion='1' +subversion='2' sysman='/usr/share/man/man1' tail='' tar='' @@ -1163,8 +1163,8 @@ vendorprefix='' vendorprefixexp='' vendorscript='' vendorscriptexp='' -version='5.24.1' -version_patchlevel_string='version 24 subversion 1' +version='5.24.2' +version_patchlevel_string='version 24 subversion 2' versiononly='undef' vi='' xlibpth='/usr/lib/386 /lib/386' @@ -1178,7 +1178,7 @@ config_args='' config_argc=0 PERL_REVISION=5 PERL_VERSION=24 -PERL_SUBVERSION=1 +PERL_SUBVERSION=2 PERL_API_REVISION=5 PERL_API_VERSION=24 PERL_API_SUBVERSION=0 Index: gnu/usr.bin/perl/Cross/config.sh-arm-linux-n770 =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Cross/config.sh-arm-linux-n770,v retrieving revision 1.3 diff -u -p -r1.3 config.sh-arm-linux-n770 --- gnu/usr.bin/perl/Cross/config.sh-arm-linux-n770 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Cross/config.sh-arm-linux-n770 11 Aug 2017 22:39:14 -0000 @@ -36,8 +36,8 @@ api_subversion='0' api_version='24' api_versionstring='5.24.0' ar='ar' -archlib='/usr/lib/perl5/5.24.1/armv4l-linux' -archlibexp='/usr/lib/perl5/5.24.1/armv4l-linux' +archlib='/usr/lib/perl5/5.24.2/armv4l-linux' +archlibexp='/usr/lib/perl5/5.24.2/armv4l-linux' archname64='' archname='armv4l-linux' archobjs='' @@ -55,7 +55,7 @@ castflags='0' cat='cat' cc='arm-none-linux-gnueabi-gcc' cccdlflags='-fpic' -ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5/5.24.1/armv4l-linux/CORE' +ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5/5.24.2/armv4l-linux/CORE' ccflags='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccflags_uselargefiles='-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' ccname='arm-linux-gcc' @@ -699,7 +699,7 @@ inc_version_list=' ' inc_version_list_init='0' incpath='' inews='' -installarchlib='./install_me_here/usr/lib/perl5/5.24.1/armv4l-linux' +installarchlib='./install_me_here/usr/lib/perl5/5.24.2/armv4l-linux' installbin='./install_me_here/usr/bin' installhtml1dir='' installhtml3dir='' @@ -707,13 +707,13 @@ installman1dir='./install_me_here/usr/sh installman3dir='./install_me_here/usr/share/man/man3' installprefix='./install_me_here/usr' installprefixexp='./install_me_here/usr' -installprivlib='./install_me_here/usr/lib/perl5/5.24.1' +installprivlib='./install_me_here/usr/lib/perl5/5.24.2' installscript='./install_me_here/usr/bin' -installsitearch='./install_me_here/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' +installsitearch='./install_me_here/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' installsitebin='./install_me_here/usr/bin' installsitehtml1dir='' installsitehtml3dir='' -installsitelib='./install_me_here/usr/lib/perl5/site_perl/5.24.1' +installsitelib='./install_me_here/usr/lib/perl5/site_perl/5.24.2' installsiteman1dir='./install_me_here/usr/share/man/man1' installsiteman3dir='./install_me_here/usr/share/man/man3' installsitescript='./install_me_here/usr/bin' @@ -841,8 +841,8 @@ pmake='' pr='' prefix='/usr' prefixexp='/usr' -privlib='/usr/lib/perl5/5.24.1' -privlibexp='/usr/lib/perl5/5.24.1' +privlib='/usr/lib/perl5/5.24.2' +privlibexp='/usr/lib/perl5/5.24.2' procselfexe='"/proc/self/exe"' prototype='define' ptrsize='4' @@ -903,17 +903,17 @@ sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 6, 17, 29, 31, 0' sig_size='68' signal_t='void' -sitearch='/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' -sitearchexp='/usr/lib/perl5/site_perl/5.24.1/armv4l-linux' +sitearch='/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' +sitearchexp='/usr/lib/perl5/site_perl/5.24.2/armv4l-linux' sitebin='/usr/bin' sitebinexp='/usr/bin' sitehtml1dir='' sitehtml1direxp='' sitehtml3dir='' sitehtml3direxp='' -sitelib='/usr/lib/perl5/site_perl/5.24.1' +sitelib='/usr/lib/perl5/site_perl/5.24.2' sitelib_stem='/usr/lib/perl5/site_perl' -sitelibexp='/usr/lib/perl5/site_perl/5.24.1' +sitelibexp='/usr/lib/perl5/site_perl/5.24.2' siteman1dir='/usr/share/man/man1' siteman1direxp='/usr/share/man/man1' siteman3dir='/usr/share/man/man3' @@ -950,7 +950,7 @@ stdio_stream_array='' strerror_r_proto='0' strings='/usr/include/string.h' submit='' -subversion='1' +subversion='2' sysman='/usr/share/man/man1' tail='' tar='' @@ -1035,8 +1035,8 @@ vendorprefix='' vendorprefixexp='' vendorscript='' vendorscriptexp='' -version='5.24.1' -version_patchlevel_string='version 24 subversion 1' +version='5.24.2' +version_patchlevel_string='version 24 subversion 2' versiononly='undef' vi='' xlibpth='/usr/lib/386 /lib/386' @@ -1050,7 +1050,7 @@ config_args='' config_argc=0 PERL_REVISION=5 PERL_VERSION=24 -PERL_SUBVERSION=1 +PERL_SUBVERSION=2 PERL_API_REVISION=5 PERL_API_VERSION=24 PERL_API_SUBVERSION=0 Index: gnu/usr.bin/perl/NetWare/Makefile =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/NetWare/Makefile,v retrieving revision 1.3 diff -u -p -r1.3 Makefile --- gnu/usr.bin/perl/NetWare/Makefile 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/NetWare/Makefile 11 Aug 2017 22:39:14 -0000 @@ -86,7 +86,7 @@ NLM_VERSION = 3,20,0 # Here comes the CW tools - TO BE FILLED TO BUILD WITH CW - -MODULE_DESC = "Perl 5.24.1 for NetWare" +MODULE_DESC = "Perl 5.24.2 for NetWare" CCTYPE = CodeWarrior C_COMPILER = mwccnlm -c CPP_COMPILER = mwccnlm @@ -462,7 +462,7 @@ INST_NW_TOP2 = $(INST_NW_DRV)\perl # versioned installation can be obtained by setting INST_TOP above to a # path that includes an arbitrary version string. # -INST_VER = \5.24.1 +INST_VER = \5.24.2 # # Comment this out if you DON'T want your perl installation to have Index: gnu/usr.bin/perl/NetWare/config_H.wc =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/NetWare/config_H.wc,v retrieving revision 1.3 diff -u -p -r1.3 config_H.wc --- gnu/usr.bin/perl/NetWare/config_H.wc 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/NetWare/config_H.wc 11 Aug 2017 22:39:14 -0000 @@ -1042,7 +1042,7 @@ * This symbol contains the ~name expanded version of ARCHLIB, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define ARCHLIB "c:\\perl\\5.24.1\\lib\\NetWare-x86-multi-thread" /**/ +#define ARCHLIB "c:\\perl\\5.24.2\\lib\\NetWare-x86-multi-thread" /**/ /*#define ARCHLIB_EXP "" /**/ /* ARCHNAME: @@ -1073,8 +1073,8 @@ * This symbol is the filename expanded version of the BIN symbol, for * programs that do not want to deal with that at run-time. */ -#define BIN "c:\\perl\\5.24.1\\bin\\NetWare-x86-multi-thread" /**/ -#define BIN_EXP "c:\\perl\\5.24.1\\bin\\NetWare-x86-multi-thread" /**/ +#define BIN "c:\\perl\\5.24.2\\bin\\NetWare-x86-multi-thread" /**/ +#define BIN_EXP "c:\\perl\\5.24.2\\bin\\NetWare-x86-multi-thread" /**/ /* BYTEORDER: * This symbol holds the hexadecimal constant defined in byteorder, @@ -3047,7 +3047,7 @@ * This symbol contains the ~name expanded version of SITEARCH, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define SITEARCH "c:\\perl\\site\\5.24.1\\lib\\NetWare-x86-multi-thread" /**/ +#define SITEARCH "c:\\perl\\site\\5.24.2\\lib\\NetWare-x86-multi-thread" /**/ /*#define SITEARCH_EXP "" /**/ /* SITELIB: @@ -3070,7 +3070,7 @@ * removed. The elements in inc_version_list (inc_version_list.U) can * be tacked onto this variable to generate a list of directories to search. */ -#define SITELIB "c:\\perl\\site\\5.24.1\\lib" /**/ +#define SITELIB "c:\\perl\\site\\5.24.2\\lib" /**/ /*#define SITELIB_EXP "" /**/ #define SITELIB_STEM "" /**/ Index: gnu/usr.bin/perl/Porting/Maintainers.pl =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/Maintainers.pl,v retrieving revision 1.11 diff -u -p -r1.11 Maintainers.pl --- gnu/usr.bin/perl/Porting/Maintainers.pl 5 Feb 2017 00:33:39 -0000 1.11 +++ gnu/usr.bin/perl/Porting/Maintainers.pl 11 Aug 2017 22:39:14 -0000 @@ -189,10 +189,6 @@ use File::Glob qw(:case); 'base' => { 'DISTRIBUTION' => 'RJBS/base-2.23.tar.gz', 'FILES' => q[dist/base], - 'CUSTOMIZED' => [ - # https://rt.perl.org/Ticket/Display.html?id=127834 - qw( lib/base.pm ) - ], }, 'bignum' => { Index: gnu/usr.bin/perl/Porting/checkAUTHORS.pl =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/checkAUTHORS.pl,v retrieving revision 1.3 diff -u -p -r1.3 checkAUTHORS.pl --- gnu/usr.bin/perl/Porting/checkAUTHORS.pl 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Porting/checkAUTHORS.pl 11 Aug 2017 22:39:14 -0000 @@ -830,6 +830,7 @@ module@renee-baecker.de + github@renee-baecker.de + otrs\100ubuntu.(none) + perl\100renee-baecker.de ++ reb\100perl-services.de richard.foley\100rfi.net richard.foley\100t-online.de + richard.foley\100ubs.com + richard.foley\100ubsw.com Index: gnu/usr.bin/perl/Porting/config.sh =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/config.sh,v retrieving revision 1.6 diff -u -p -r1.6 config.sh --- gnu/usr.bin/perl/Porting/config.sh 5 Feb 2017 00:31:54 -0000 1.6 +++ gnu/usr.bin/perl/Porting/config.sh 11 Aug 2017 22:39:14 -0000 @@ -43,8 +43,8 @@ api_subversion='0' api_version='24' api_versionstring='5.24.0' ar='ar' -archlib='/tmp/mblead/lib/perl5/5.24.1/darwin-2level' -archlibexp='/tmp/mblead/lib/perl5/5.24.1/darwin-2level' +archlib='/tmp/mblead/lib/perl5/5.24.2/darwin-2level' +archlibexp='/tmp/mblead/lib/perl5/5.24.2/darwin-2level' archname64='' archname='darwin-2level' archobjs='' @@ -829,7 +829,7 @@ incpath='' incpth='/usr/local/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin/../lib/clang/6.0/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/include /usr/include /usr/local/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin/../lib/clang/6.0/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/include /usr/include /usr/local/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/bin/../lib/clang/6.0/include /Applications/Xcode.app/Contents/Developer/Toolchains/XcodeDefault.xctoolchain/usr/include /usr/include' inews='' initialinstalllocation='/tmp/mblead/bin' -installarchlib='/tmp/mblead/lib/perl5/5.24.1/darwin-2level' +installarchlib='/tmp/mblead/lib/perl5/5.24.2/darwin-2level' installbin='/tmp/mblead/bin' installhtml1dir='' installhtml3dir='' @@ -837,13 +837,13 @@ installman1dir='/tmp/mblead/man/man1' installman3dir='/tmp/mblead/man/man3' installprefix='/tmp/mblead' installprefixexp='/tmp/mblead' -installprivlib='/tmp/mblead/lib/perl5/5.24.1' +installprivlib='/tmp/mblead/lib/perl5/5.24.2' installscript='/tmp/mblead/bin' -installsitearch='/tmp/mblead/lib/perl5/site_perl/5.24.1/darwin-2level' +installsitearch='/tmp/mblead/lib/perl5/site_perl/5.24.2/darwin-2level' installsitebin='/tmp/mblead/bin' installsitehtml1dir='' installsitehtml3dir='' -installsitelib='/tmp/mblead/lib/perl5/site_perl/5.24.1' +installsitelib='/tmp/mblead/lib/perl5/site_perl/5.24.2' installsiteman1dir='/tmp/mblead/man/man1' installsiteman3dir='/tmp/mblead/man/man3' installsitescript='/tmp/mblead/bin' @@ -968,7 +968,7 @@ perl_patchlevel='' perl_static_inline='static __inline__' perladmin='aaron@daybreak.nonet' perllibs='-lpthread -ldl -lm -lutil -lc' -perlpath='/tmp/mblead/bin/perl5.24.1' +perlpath='/tmp/mblead/bin/perl5.24.2' pg='pg' phostname='hostname' pidtype='pid_t' @@ -977,8 +977,8 @@ pmake='' pr='' prefix='/tmp/mblead' prefixexp='/tmp/mblead' -privlib='/tmp/mblead/lib/perl5/5.24.1' -privlibexp='/tmp/mblead/lib/perl5/5.24.1' +privlib='/tmp/mblead/lib/perl5/5.24.2' +privlibexp='/tmp/mblead/lib/perl5/5.24.2' procselfexe='' prototype='define' ptrsize='8' @@ -1044,17 +1044,17 @@ sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 6, 0' sig_size='33' signal_t='void' -sitearch='/tmp/mblead/lib/perl5/site_perl/5.24.1/darwin-2level' -sitearchexp='/tmp/mblead/lib/perl5/site_perl/5.24.1/darwin-2level' +sitearch='/tmp/mblead/lib/perl5/site_perl/5.24.2/darwin-2level' +sitearchexp='/tmp/mblead/lib/perl5/site_perl/5.24.2/darwin-2level' sitebin='/tmp/mblead/bin' sitebinexp='/tmp/mblead/bin' sitehtml1dir='' sitehtml1direxp='' sitehtml3dir='' sitehtml3direxp='' -sitelib='/tmp/mblead/lib/perl5/site_perl/5.24.1' +sitelib='/tmp/mblead/lib/perl5/site_perl/5.24.2' sitelib_stem='/tmp/mblead/lib/perl5/site_perl' -sitelibexp='/tmp/mblead/lib/perl5/site_perl/5.24.1' +sitelibexp='/tmp/mblead/lib/perl5/site_perl/5.24.2' siteman1dir='/tmp/mblead/man/man1' siteman1direxp='/tmp/mblead/man/man1' siteman3dir='/tmp/mblead/man/man3' @@ -1080,7 +1080,7 @@ src='.' ssizetype='ssize_t' st_ino_sign='1' st_ino_size='8' -startperl='#!/tmp/mblead/bin/perl5.24.1' +startperl='#!/tmp/mblead/bin/perl5.24.2' startsh='#!/bin/sh' static_ext=' ' stdchar='char' @@ -1093,7 +1093,7 @@ stdio_stream_array='' strerror_r_proto='0' strings='/usr/include/string.h' submit='' -subversion='1' +subversion='2' sysman='/usr/share/man/man1' sysroot='' tail='' @@ -1192,8 +1192,8 @@ vendorprefix='' vendorprefixexp='' vendorscript='' vendorscriptexp='' -version='5.24.1' -version_patchlevel_string='version 24 subversion 1' +version='5.24.2' +version_patchlevel_string='version 24 subversion 2' versiononly='define' vi='' xlibpth='/usr/lib/386 /lib/386' @@ -1203,7 +1203,7 @@ zcat='' zip='zip' PERL_REVISION=5 PERL_VERSION=24 -PERL_SUBVERSION=1 +PERL_SUBVERSION=2 PERL_API_REVISION=5 PERL_API_VERSION=24 PERL_API_SUBVERSION=0 Index: gnu/usr.bin/perl/Porting/config_H =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/config_H,v retrieving revision 1.18 diff -u -p -r1.18 config_H --- gnu/usr.bin/perl/Porting/config_H 5 Feb 2017 00:31:54 -0000 1.18 +++ gnu/usr.bin/perl/Porting/config_H 11 Aug 2017 22:39:14 -0000 @@ -960,8 +960,8 @@ * This symbol contains the ~name expanded version of ARCHLIB, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define ARCHLIB "/pro/lib/perl5/5.24.1/i686-linux-64int-ld" /**/ -#define ARCHLIB_EXP "/pro/lib/perl5/5.24.1/i686-linux-64int-ld" /**/ +#define ARCHLIB "/pro/lib/perl5/5.24.2/i686-linux-64int-ld" /**/ +#define ARCHLIB_EXP "/pro/lib/perl5/5.24.2/i686-linux-64int-ld" /**/ /* ARCHNAME: * This symbol holds a string representing the architecture name. @@ -2068,8 +2068,8 @@ * This symbol contains the ~name expanded version of PRIVLIB, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define PRIVLIB "/pro/lib/perl5/5.24.1" /**/ -#define PRIVLIB_EXP "/pro/lib/perl5/5.24.1" /**/ +#define PRIVLIB "/pro/lib/perl5/5.24.2" /**/ +#define PRIVLIB_EXP "/pro/lib/perl5/5.24.2" /**/ /* PTRSIZE: * This symbol contains the size of a pointer, so that the C preprocessor @@ -2119,8 +2119,8 @@ * This symbol contains the ~name expanded version of SITEARCH, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define SITEARCH "/pro/lib/perl5/site_perl/5.24.1/i686-linux-64int-ld" /**/ -#define SITEARCH_EXP "/pro/lib/perl5/site_perl/5.24.1/i686-linux-64int-ld" /**/ +#define SITEARCH "/pro/lib/perl5/site_perl/5.24.2/i686-linux-64int-ld" /**/ +#define SITEARCH_EXP "/pro/lib/perl5/site_perl/5.24.2/i686-linux-64int-ld" /**/ /* SITELIB: * This symbol contains the name of the private library for this package. @@ -2142,8 +2142,8 @@ * removed. The elements in inc_version_list (inc_version_list.U) can * be tacked onto this variable to generate a list of directories to search. */ -#define SITELIB "/pro/lib/perl5/site_perl/5.24.1" /**/ -#define SITELIB_EXP "/pro/lib/perl5/site_perl/5.24.1" /**/ +#define SITELIB "/pro/lib/perl5/site_perl/5.24.2" /**/ +#define SITELIB_EXP "/pro/lib/perl5/site_perl/5.24.2" /**/ #define SITELIB_STEM "/pro/lib/perl5/site_perl" /**/ /* SSize_t: @@ -4282,7 +4282,7 @@ * script to make sure (one hopes) that it runs with perl and not * some shell. */ -#define STARTPERL "#!/pro/bin/perl5.24.1" /**/ +#define STARTPERL "#!/pro/bin/perl5.24.2" /**/ /* HAS_STDIO_STREAM_ARRAY: * This symbol, if defined, tells that there is an array Index: gnu/usr.bin/perl/Porting/epigraphs.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/epigraphs.pod,v retrieving revision 1.3 diff -u -p -r1.3 epigraphs.pod --- gnu/usr.bin/perl/Porting/epigraphs.pod 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Porting/epigraphs.pod 11 Aug 2017 22:39:15 -0000 @@ -17,6 +17,102 @@ Consult your favorite dictionary for det =head1 EPIGRAPHS +=head2 v5.27.1 - Rona Munro, Doctor Who: Survival + +L + + There are worlds out there where the sky is burning, + where the sea's asleep and the rivers dream, + people made of smoke and cities made of song. + Somewhere there's danger, + somewhere there's injustice + and somewhere else the tea is getting cold. + Come on, Ace, we've got work to do. + +=head2 v5.27.0 - Bertrand Russell, The Road to Happiness + +L + + People who have theories as to how one should live tend to forget the + limitations of nature. If your way of life involves constant + restraint of impulse for the sake of some one supreme aim that you + have set yourself, it is likely that the aim will become increasingly + distasteful because of the efforts that it demands; impulse, denied + its normal outlets, will find others, probably in spite; pleasure, if + you allow yourself any at all, will be dissociated from the main + current of your life, and will become Bacchic and frivolous. Such + pleasure brings no happiness, but only a deeper despair. + + -- Bertrand Russell, The Road to Happiness + +=head2 v5.26.0 - Nine Simone, Ain't Got No / I Got Life + +L + + I've got the life + And I'm gonna keep it + I've got the life + And nobody's gonna take it away + I've got the life + +=head2 v5.26.0-RC2 - Richard Condon, The Manchurian Candidate + +L + + Amateur psychiatric prognosis can be fascinating when there is + absolutely nothing else to do. + +=head2 v5.26.0-RC1 - Thomas Paine, Common Sense + +L + + A long habit of not thinking a thing WRONG, gives it a superficial + appearance of being RIGHT, and raises at first a formidable outcry in + defense of custom. But the tumult soon subsides. Time makes more + converts than reason. + +=head2 v5.25.12 - Kurt Vonnegut, Slaughterhouse-Five + +L + + I have told my sons that they are not under any circumstances to take + part in massacres, and that the news of massacres of enemies is not + to fill them with satisfaction or glee. + + I have also told them not to work for companies which make massacre + machinery, and to express contempt for people who think we need + machinery like that. + +=head2 v5.25.11 - Daniel Kahneman, Thinking, Fast and Slow + +L + + Subjective confidence in a judgment is not a reasoned evaluation of + the probability that this judgment is correct. Confidence is a + feeling, which reflects the coherence of the information and the + cognitive ease of processing it. It is wise to take admissions of + uncertainty seriously, but declarations of high confidence mainly + tell you that an individual has constructed a coherent story in his + mind, not necessarily that the story is true. + +=head2 v5.25.10 - Erich Fried, 1968 + +L + + He who wants the world to remain as it is + doesn't want it to remain. + +=head2 v5.25.9 - A. A. Milne, "Winnie-the-Pooh", 1926 + +L + + Pooh always liked a little something at eleven o'clock in the + morning, and he was very glad to see Rabbit getting out the plates + and mugs; and when Rabbit said, "Honey or condensed milk with + your bread?" he was so excited that he said, "Both," and then, + so as not to seem greedy, he added, "But don't bother about the + bread, please." + =head2 v5.25.8 - Langston Hughes, So long L @@ -36,12 +132,12 @@ L - Of Beren and Lúthien + Of Beren and LĂșthien Among the tales of sorrow and of ruin that come down to us from the darkness of those days there are yet some in which amid weeping there is joy and under the shadow of death light that endures. And of these histories most fair still in - the ears of the Elves is the tale of Beren and Lúthien. Of their lives was made + the ears of the Elves is the tale of Beren and LĂșthien. Of their lives was made the Lay of Leithian, Release from Bondage, which is the longest save one of the songs concerning the world of old; but here is told in fewer words and without song. @@ -193,6 +289,62 @@ L + + The animal I really dig + Above all others is the pig. + Pigs are noble. Pigs are clever, + Pig are courteous. However, + Now and then, to break this rule, + One meets a pig who is a fool. + What, for example, would you say + If strolling through the woods one day, + Right there in front of you you saw + A pig who'd built his house of STRAW? + The Wolf who saw it licked his lips, + And said, 'That pig has had his chips.' + +=head2 v5.24.1 - Charles Dodgson [as "Lewis Carroll"], "The Hunting of the Snark", Fit 4: The Hunting + +L + + The Bellman looked uffish, and wrinkled his brow. + 'If only you'd spoken before! + It's excessively awkward to mention it now, + With the Snark, so to speak, at the door! + + 'We should all of us grieve, as you well may believe, + If you never were met with again - + But surely, my man, when the voyage began, + You might have suggested it then? + + 'It's excessively awkward to mention it now - + As I think I've already remarked.' + And the man they called 'Hi!' replied, with a sigh, + 'I informed you the day we embarked. + + 'You may charge me with murder - or want of sense - + (We are all of us weak at times): + But the slightest approach to a false pretence + Was never among my crimes! + + 'I said it in Hebrew - I said it in Dutch - + I said it in German and Greek: + But I wholly forgot (and it vexes me much) + That English is what you speak!' + + ''Tis a pitiful tale,' said the Bellman, whose face + Had grown longer at every word: + 'But, now that you've stated the whole of your case, + More debate would be simply absurd. + + 'The rest of my speech' (he exclaimed to his men) + 'You shall hear when I've leisure to speak it. + But the Snark is at hand, let me tell you again! + 'Tis your glorious duty to seek it! + =head2 v5.24.1-RC5 - John Milton, ed. Gordon Campbell, "Paradise Regained", Book IV L @@ -680,6 +832,61 @@ L + + As soon as Wolf began to feel + That he would like a decent meal, + He went and knocked on Grandma's door. + When Grandma opened it, she saw + The sharp white teeth, the horrid grin, + And Wolfie said, 'May I come in?' + Poor Grandmamma was terrified, + 'He's going to eat me up!' she cried. + And she was absolutely right. + He ate her up in one big bite. + +=head2 v5.22.3 - Charles Dodgson [as "Lewis Carroll"], "Phantasmagoria", Canto 6: Discomfyture + +L + + As one who strives a hill to climb, + Who never climbed before: + Who finds it, in a little time, + Grow every moment less sublime, + And votes the thing a bore: + + Yet, having once begun to try, + Dares not desert his quest, + But, climbing, ever keeps his eye + On one small hut against the sky + Wherein he hopes to rest: + + Who climbs till nerve and force are spent, + With many a puff and pant: + Who still, as rises the ascent, + In language grows more violent, + Although in breath more scant: + + Who, climbing, gains at length the place + That crowns the upward track: + And, entering with unsteady pace, + Receives a buffet in the face + That lands him on his back: + + And feels himself, like one in sleep, + Glide swiftly down again, + A helpless weight, from steep to steep, + Till, with a headlong giddy sweep, + He drops upon the plain - + + So I, that had resolved to bring + Conviction to a ghost, + And found it quite a different thing + From any human arguing, + Yet dared not quit my post. =head2 v5.22.3-RC5 - John Milton, ed. Gordon Campbell, "Paradise Regained", Book II Index: gnu/usr.bin/perl/Porting/perldelta_template.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/perldelta_template.pod,v retrieving revision 1.3 diff -u -p -r1.3 perldelta_template.pod --- gnu/usr.bin/perl/Porting/perldelta_template.pod 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Porting/perldelta_template.pod 11 Aug 2017 22:39:15 -0000 @@ -378,7 +378,7 @@ here. XXX Generate this with: - perl Porting/acknowledgements.pl v5.24.1..HEAD + perl Porting/acknowledgements.pl v5.24.2..HEAD =head1 Reporting Bugs Index: gnu/usr.bin/perl/Porting/release_managers_guide.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/release_managers_guide.pod,v retrieving revision 1.3 diff -u -p -r1.3 release_managers_guide.pod --- gnu/usr.bin/perl/Porting/release_managers_guide.pod 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Porting/release_managers_guide.pod 11 Aug 2017 22:39:15 -0000 @@ -173,7 +173,7 @@ which has a F directory to If you use Dropbox, you can append "raw=1" as a parameter to their usual sharing link to allow direct download (albeit with redirects). -=head3 git clone of https://github.com/perlorg/perlweb +=head3 git clone of L For updating the L web pages, either a Github account or sweet-talking somebody with a Github account into obedience is needed. This @@ -245,6 +245,15 @@ have some extra changes. =head3 How to sync a CPAN module with a cpanE distro +In most cases, once a new version of a distribution shipped with core has been +uploaded to CPAN, the core version thereof can be synchronized automatically +with the program F. (But see the comments at the +beginning of that program. In particular, it has not yet been exercised on +Windows as much as it has on Unix-like platforms.) + +If, however, F does not provide good results, follow +the steps below. + =over 4 =item * @@ -326,12 +335,6 @@ If everything is ok, commit the changes. For entries with a non-simple C section, or with a C, you may have to take more steps than listed above. -F is a script that automates most of the steps -above; but see the comments at the beginning of the file. In particular, -it has not yet been exercised on Windows, but will certainly require a set -of Unix tools such as Cygwin, and steps that run C will need to run -C instead. - =head3 dual-life CPAN module stability Ensure dual-life CPAN modules are stable, which comes down to: @@ -370,14 +373,14 @@ fix. =head3 monitor CPAN testers for failures For any release except a BLEAD-POINT: Examine the relevant analysis report(s) -at http://analysis.cpantesters.org/beforemaintrelease to see how the impending -release is performing compared to previous releases with regard to building -and testing CPAN modules. +at L to see how the +impending release is performing compared to previous releases with +regard to building and testing CPAN modules. That page accepts a query parameter, C that takes a pair of colon-delimited versions to use for comparison. For example: -http://analysis.cpantesters.org/beforemaintrelease?pair=5.20.2:5.22.0%20RC1 +L =head3 update perldelta @@ -597,9 +600,23 @@ C<$Module::CoreList::Utils::VERSION> sho C<$Module::CoreList::VERSION>. If necessary, bump those two versions to match before proceeding. -The files to modify are: F, -F and -F. +The files to modify are: + +=over 4 + +=item * + +F + +=item * + +F + +=item * + +F + +=back =head4 Update C with module version data for the new release. @@ -627,7 +644,7 @@ modules on CPAN. It can use a full, loca on HTTP::Tiny to fetch package metadata remotely. (If you'd prefer to have a full CPAN mirror, see -http://www.cpan.org/misc/cpan-faq.html#How_mirror_CPAN) +L) Then change to your perl checkout, and if necessary, @@ -722,7 +739,7 @@ formatting, e.g. $ ./perl -Ilib ext/Pod-Html/bin/pod2html pod/perldelta.pod > \ /tmp/perldelta.html -Another good HTML preview option is http://search.cpan.org/pod2html +Another good HTML preview option is L If you make changes, be sure to commit them. @@ -793,12 +810,14 @@ then configure and build perl so that yo For the first RC for a MAINT release, copy in the latest F from blead; this will include details of newer releases in all branches. In theory, blead's version should be a strict -superset of the one in this branch, but it's probably safest to diff them -first to ensure that there's nothing in this branch that was forgotten -from blead: +superset of the one in this branch, but it's probably safest to examine the +changes first, to ensure that there's nothing in this branch that was +forgotten from blead. An easy way to do that is with C<< git checkout -p >>, +to selectively apply any changes from the blead version to your current +branch: - $ diff pod/perlhist.pod ..../blead/pod/perlhist.pod - $ cp ..../blead/pod/perlhist.pod pod/ + $ git fetch origin + $ git checkout -p origin/blead pod/perlhist.pod $ git commit -m 'sync perlhist from blead' pod/perlhist.pod =head3 update perlhist.pod @@ -966,10 +985,10 @@ your own tarball testing, below. Check that basic configuration and tests work on each test machine: - $ ./Configure -des && make all test + $ ./Configure -des && make all minitest test # Or for a development release: - $ ./Configure -Dusedevel -des && make all test + $ ./Configure -Dusedevel -des && make all minitest test =head4 Run the test harness and install @@ -1021,6 +1040,11 @@ Bootstrap the CPAN client on the clean i =head4 Install the Inline module with CPAN and test it +If you're using C, you should reset your environment before +performing these actions: + + $ unset PERL5LIB PERL_MB_OPT PERL_LOCAL_LIB_ROOT PERL_MM_OPT + Try installing a popular CPAN module that's reasonably complex and that has dependencies; for example: @@ -1394,7 +1418,7 @@ Thanks for releasing perl! =head2 Building a release - the day after -=for checklist skip BLEAD-FINAL, MAINT, RC +=for checklist skip BLEAD-FINAL MAINT RC =head3 update Module::CoreList @@ -1526,7 +1550,7 @@ will make life easier for the next relea =head1 SOURCE Based on -http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2009-05/msg00608.html, +L, plus a whole bunch of other sources, including private correspondence. =cut Index: gnu/usr.bin/perl/Porting/todo.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/Porting/todo.pod,v retrieving revision 1.3 diff -u -p -r1.3 todo.pod --- gnu/usr.bin/perl/Porting/todo.pod 5 Feb 2017 00:31:54 -0000 1.3 +++ gnu/usr.bin/perl/Porting/todo.pod 11 Aug 2017 22:39:15 -0000 @@ -467,7 +467,7 @@ Natively 64-bit systems need neither -Du On these systems, it might be the default compilation mode, and there is currently no guarantee that passing no use64bitall option to the Configure process will build a 32bit perl. Implementing -Duse32bit* -options would be nice for perl 5.24.1. +options would be nice for perl 5.24.2. =head2 Profile Perl - am I hot or not? @@ -1170,7 +1170,7 @@ L 32; + +eval "require Path::Class"; + + +SKIP: { + skip "Path::Class required to run this test", 32 if $@; + use File::Path qw(remove_tree make_path); + Path::Class->import; + + my $name = 'test'; + my $dir = dir($name); + + for my $mk_dir ($name, dir($name)) { + for my $mk_pass_arg (0, 1) { + + for my $rm_dir ($name, dir($name)) { + for my $rm_pass_arg (0, 1) { + remove_tree($name) if -e $name; + + my ($mk_args, $mk_desc) = test($mk_dir, $mk_pass_arg); + make_path(@$mk_args); + + if (ok( -d $dir, "we made $dir ($mk_desc)")) { + my ($rm_args, $rm_desc) = test($rm_dir, $rm_pass_arg); + remove_tree(@$rm_args); + ok( ! -d $dir, "...then we removed $dir ($rm_desc)"); + } else { + fail("...can't remove it if we didn't create it"); + } + } + } + } + } +} + +sub test { + my ($dir, $pass_arg) = @_; + + my $args = [ $dir, ($pass_arg ? {} : ()) ]; + my $desc = sprintf( + 'dir isa %s, second arg is %s', + (ref($dir) || 'string'), + ($pass_arg ? '{}' : 'not passed') + ); + + return ($args, $desc); +} Index: gnu/usr.bin/perl/dist/Module-CoreList/Changes =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/Module-CoreList/Changes,v retrieving revision 1.3 diff -u -p -r1.3 Changes --- gnu/usr.bin/perl/dist/Module-CoreList/Changes 5 Feb 2017 00:32:09 -0000 1.3 +++ gnu/usr.bin/perl/dist/Module-CoreList/Changes 11 Aug 2017 22:39:15 -0000 @@ -1,5 +1,32 @@ +5.20170715_24 + - Updated for v5.24.2 + +5.20170621 + - Updated for v5.27.1 + +5.20170531 + - Updated for v5.27.0 + +5.20170530 + - Updated for v5.26.0 + +5.20170420 + - Updated for v5.25.12 + +5.20170320 + - Updated for v5.25.11 + +5.20170220 + - Updated for v5.25.10 + +5.20170120 + - Updated for v5.25.9 + 5.20170114_24 - Updated for v5.24.1 + +5.20170114_22 + - Updated for v5.22.3 5.20161220 - Updated for v5.25.8 Index: gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList.pm =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList.pm,v retrieving revision 1.5 diff -u -p -r1.5 CoreList.pm --- gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList.pm 5 Feb 2017 00:33:40 -0000 1.5 +++ gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList.pm 11 Aug 2017 22:39:16 -0000 @@ -4,7 +4,7 @@ use vars qw/$VERSION %released %version %bug_tracker %deprecated %delta/; use Module::CoreList::TieHashDelta; use version; -$VERSION = '5.20170114_24'; +$VERSION = '5.20170715_24'; sub _released_order { # Sort helper, to make '?' sort after everything else (substr($released{$a}, 0, 1) eq "?") @@ -302,7 +302,16 @@ sub changes_between { 5.025006 => '2016-10-20', 5.025007 => '2016-11-20', 5.025008 => '2016-12-20', + 5.022003 => '2017-01-14', 5.024001 => '2017-01-14', + 5.025009 => '2017-01-20', + 5.025010 => '2017-02-20', + 5.025011 => '2017-03-20', + 5.025012 => '2017-04-20', + 5.026000 => '2017-05-30', + 5.027000 => '2017-05-31', + 5.027001 => '2017-06-20', + 5.024002 => '2017-07-15', ); for my $version ( sort { $a <=> $b } keys %released ) { @@ -13520,6 +13529,174 @@ for my $version ( sort { $a <=> $b } key removed => { } }, + 5.022003 => { + delta_from => 5.022002, + changed => { + 'App::Cpan' => '1.63_01', + 'App::Prove' => '3.35_01', + 'App::Prove::State' => '3.35_01', + 'App::Prove::State::Result'=> '3.35_01', + 'App::Prove::State::Result::Test'=> '3.35_01', + 'Archive::Tar' => '2.04_01', + 'Archive::Tar::Constant'=> '2.04_01', + 'Archive::Tar::File' => '2.04_01', + 'B::Op_private' => '5.022003', + 'CPAN' => '2.11_01', + 'Compress::Zlib' => '2.068_001', + 'Config' => '5.022003', + 'Cwd' => '3.56_02', + 'Digest' => '1.17_01', + 'Digest::SHA' => '5.95_01', + 'Encode' => '2.72_01', + 'ExtUtils::Command' => '1.20_01', + 'ExtUtils::Command::MM' => '7.04_02', + 'ExtUtils::Liblist' => '7.04_02', + 'ExtUtils::Liblist::Kid'=> '7.04_02', + 'ExtUtils::MM' => '7.04_02', + 'ExtUtils::MM_AIX' => '7.04_02', + 'ExtUtils::MM_Any' => '7.04_02', + 'ExtUtils::MM_BeOS' => '7.04_02', + 'ExtUtils::MM_Cygwin' => '7.04_02', + 'ExtUtils::MM_DOS' => '7.04_02', + 'ExtUtils::MM_Darwin' => '7.04_02', + 'ExtUtils::MM_MacOS' => '7.04_02', + 'ExtUtils::MM_NW5' => '7.04_02', + 'ExtUtils::MM_OS2' => '7.04_02', + 'ExtUtils::MM_QNX' => '7.04_02', + 'ExtUtils::MM_UWIN' => '7.04_02', + 'ExtUtils::MM_Unix' => '7.04_02', + 'ExtUtils::MM_VMS' => '7.04_02', + 'ExtUtils::MM_VOS' => '7.04_02', + 'ExtUtils::MM_Win32' => '7.04_02', + 'ExtUtils::MM_Win95' => '7.04_02', + 'ExtUtils::MY' => '7.04_02', + 'ExtUtils::MakeMaker' => '7.04_02', + 'ExtUtils::MakeMaker::Config'=> '7.04_02', + 'ExtUtils::Mkbootstrap' => '7.04_02', + 'ExtUtils::Mksymlists' => '7.04_02', + 'ExtUtils::testlib' => '7.04_02', + 'File::Fetch' => '0.48_01', + 'File::Spec' => '3.56_02', + 'File::Spec::Cygwin' => '3.56_02', + 'File::Spec::Epoc' => '3.56_02', + 'File::Spec::Functions' => '3.56_02', + 'File::Spec::Mac' => '3.56_02', + 'File::Spec::OS2' => '3.56_02', + 'File::Spec::Unix' => '3.56_02', + 'File::Spec::VMS' => '3.56_02', + 'File::Spec::Win32' => '3.56_02', + 'HTTP::Tiny' => '0.054_01', + 'I18N::LangTags::Detect'=> '1.05_01', + 'IO' => '1.35_01', + 'IO::Compress::Adapter::Bzip2'=> '2.068_001', + 'IO::Compress::Adapter::Deflate'=> '2.068_001', + 'IO::Compress::Adapter::Identity'=> '2.068_001', + 'IO::Compress::Base' => '2.068_001', + 'IO::Compress::Base::Common'=> '2.068_001', + 'IO::Compress::Bzip2' => '2.068_001', + 'IO::Compress::Deflate' => '2.068_001', + 'IO::Compress::Gzip' => '2.068_001', + 'IO::Compress::Gzip::Constants'=> '2.068_001', + 'IO::Compress::RawDeflate'=> '2.068_001', + 'IO::Compress::Zip' => '2.068_001', + 'IO::Compress::Zip::Constants'=> '2.068_001', + 'IO::Compress::Zlib::Constants'=> '2.068_001', + 'IO::Compress::Zlib::Extra'=> '2.068_001', + 'IO::Uncompress::Adapter::Bunzip2'=> '2.068_001', + 'IO::Uncompress::Adapter::Identity'=> '2.068_001', + 'IO::Uncompress::Adapter::Inflate'=> '2.068_001', + 'IO::Uncompress::AnyInflate'=> '2.068_001', + 'IO::Uncompress::AnyUncompress'=> '2.068_001', + 'IO::Uncompress::Base' => '2.068_001', + 'IO::Uncompress::Bunzip2'=> '2.068_001', + 'IO::Uncompress::Gunzip'=> '2.068_001', + 'IO::Uncompress::Inflate'=> '2.068_001', + 'IO::Uncompress::RawInflate'=> '2.068_001', + 'IO::Uncompress::Unzip' => '2.068_001', + 'IPC::Cmd' => '0.92_01', + 'JSON::PP' => '2.27300_01', + 'Locale::Maketext' => '1.26_01', + 'Locale::Maketext::Simple'=> '0.21_01', + 'Memoize' => '1.03_01', + 'Module::CoreList' => '5.20170114_22', + 'Module::CoreList::TieHashDelta'=> '5.20170114_22', + 'Module::CoreList::Utils'=> '5.20170114_22', + 'Module::Metadata::corpus::BOMTest::UTF16BE'=> undef, + 'Module::Metadata::corpus::BOMTest::UTF16LE'=> undef, + 'Module::Metadata::corpus::BOMTest::UTF8'=> '1', + 'Net::Cmd' => '3.05_01', + 'Net::Config' => '3.05_01', + 'Net::Domain' => '3.05_01', + 'Net::FTP' => '3.05_01', + 'Net::FTP::A' => '3.05_01', + 'Net::FTP::E' => '3.05_01', + 'Net::FTP::I' => '3.05_01', + 'Net::FTP::L' => '3.05_01', + 'Net::FTP::dataconn' => '3.05_01', + 'Net::NNTP' => '3.05_01', + 'Net::Netrc' => '3.05_01', + 'Net::POP3' => '3.05_01', + 'Net::Ping' => '2.43_01', + 'Net::SMTP' => '3.05_01', + 'Net::Time' => '3.05_01', + 'Parse::CPAN::Meta' => '1.4414_001', + 'Pod::Html' => '1.2201', + 'Pod::Perldoc' => '3.25_01', + 'Storable' => '2.53_02', + 'Sys::Syslog' => '0.33_01', + 'TAP::Base' => '3.35_01', + 'TAP::Formatter::Base' => '3.35_01', + 'TAP::Formatter::Color' => '3.35_01', + 'TAP::Formatter::Console'=> '3.35_01', + 'TAP::Formatter::Console::ParallelSession'=> '3.35_01', + 'TAP::Formatter::Console::Session'=> '3.35_01', + 'TAP::Formatter::File' => '3.35_01', + 'TAP::Formatter::File::Session'=> '3.35_01', + 'TAP::Formatter::Session'=> '3.35_01', + 'TAP::Harness' => '3.35_01', + 'TAP::Harness::Env' => '3.35_01', + 'TAP::Object' => '3.35_01', + 'TAP::Parser' => '3.35_01', + 'TAP::Parser::Aggregator'=> '3.35_01', + 'TAP::Parser::Grammar' => '3.35_01', + 'TAP::Parser::Iterator' => '3.35_01', + 'TAP::Parser::Iterator::Array'=> '3.35_01', + 'TAP::Parser::Iterator::Process'=> '3.35_01', + 'TAP::Parser::Iterator::Stream'=> '3.35_01', + 'TAP::Parser::IteratorFactory'=> '3.35_01', + 'TAP::Parser::Multiplexer'=> '3.35_01', + 'TAP::Parser::Result' => '3.35_01', + 'TAP::Parser::Result::Bailout'=> '3.35_01', + 'TAP::Parser::Result::Comment'=> '3.35_01', + 'TAP::Parser::Result::Plan'=> '3.35_01', + 'TAP::Parser::Result::Pragma'=> '3.35_01', + 'TAP::Parser::Result::Test'=> '3.35_01', + 'TAP::Parser::Result::Unknown'=> '3.35_01', + 'TAP::Parser::Result::Version'=> '3.35_01', + 'TAP::Parser::Result::YAML'=> '3.35_01', + 'TAP::Parser::ResultFactory'=> '3.35_01', + 'TAP::Parser::Scheduler'=> '3.35_01', + 'TAP::Parser::Scheduler::Job'=> '3.35_01', + 'TAP::Parser::Scheduler::Spinner'=> '3.35_01', + 'TAP::Parser::Source' => '3.35_01', + 'TAP::Parser::SourceHandler'=> '3.35_01', + 'TAP::Parser::SourceHandler::Executable'=> '3.35_01', + 'TAP::Parser::SourceHandler::File'=> '3.35_01', + 'TAP::Parser::SourceHandler::Handle'=> '3.35_01', + 'TAP::Parser::SourceHandler::Perl'=> '3.35_01', + 'TAP::Parser::SourceHandler::RawTAP'=> '3.35_01', + 'TAP::Parser::YAMLish::Reader'=> '3.35_01', + 'TAP::Parser::YAMLish::Writer'=> '3.35_01', + 'Test' => '1.26_01', + 'Test::Harness' => '3.35_01', + 'XSLoader' => '0.20_01', + 'bigint' => '0.39_01', + 'bignum' => '0.39_01', + 'bigrat' => '0.39_01', + }, + removed => { + } + }, 5.024001 => { delta_from => 5.024000, changed => { @@ -13683,7 +13860,6 @@ for my $version ( sort { $a <=> $b } key 'Test' => '1.28_01', 'Test::Harness' => '3.36_01', 'XSLoader' => '0.22', - 'base' => '2.23_01', 'bigint' => '0.42_01', 'bignum' => '0.42_01', 'bigrat' => '0.42_01', @@ -13691,6 +13867,415 @@ for my $version ( sort { $a <=> $b } key removed => { } }, + 5.025009 => { + delta_from => 5.025008, + changed => { + 'App::Cpan' => '1.66', + 'B::Deparse' => '1.40', + 'B::Op_private' => '5.025009', + 'B::Terse' => '1.07', + 'B::Xref' => '1.06', + 'CPAN' => '2.16', + 'CPAN::Bundle' => '5.5002', + 'CPAN::Distribution' => '2.16', + 'CPAN::Exception::RecursiveDependency'=> '5.5001', + 'CPAN::FTP' => '5.5008', + 'CPAN::FirstTime' => '5.5310', + 'CPAN::HandleConfig' => '5.5008', + 'CPAN::Module' => '5.5003', + 'Compress::Raw::Bzip2' => '2.070', + 'Compress::Raw::Zlib' => '2.070', + 'Config' => '5.025009', + 'DB_File' => '1.840', + 'Data::Dumper' => '2.167', + 'Devel::SelfStubber' => '1.06', + 'DynaLoader' => '1.41', + 'Errno' => '1.28', + 'ExtUtils::Embed' => '1.34', + 'File::Glob' => '1.28', + 'I18N::LangTags' => '0.42', + 'Module::CoreList' => '5.20170120', + 'Module::CoreList::TieHashDelta'=> '5.20170120', + 'Module::CoreList::Utils'=> '5.20170120', + 'OS2::Process' => '1.12', + 'PerlIO::scalar' => '0.26', + 'Pod::Html' => '1.2202', + 'Storable' => '2.61', + 'Symbol' => '1.08', + 'Term::ReadLine' => '1.16', + 'Test' => '1.30', + 'Unicode::UCD' => '0.68', + 'VMS::DCLsym' => '1.08', + 'XS::APItest' => '0.88', + 'XSLoader' => '0.26', + 'attributes' => '0.29', + 'diagnostics' => '1.36', + 'feature' => '1.46', + 'lib' => '0.64', + 'overload' => '1.28', + 're' => '0.34', + 'threads' => '2.12', + 'threads::shared' => '1.54', + }, + removed => { + } + }, + 5.025010 => { + delta_from => 5.025009, + changed => { + 'B' => '1.68', + 'B::Op_private' => '5.025010', + 'CPAN' => '2.17', + 'CPAN::Distribution' => '2.17', + 'Config' => '5.02501', + 'Getopt::Std' => '1.12', + 'Module::CoreList' => '5.20170220', + 'Module::CoreList::TieHashDelta'=> '5.20170220', + 'Module::CoreList::Utils'=> '5.20170220', + 'PerlIO' => '1.10', + 'Storable' => '2.62', + 'Thread::Queue' => '3.12', + 'feature' => '1.47', + 'open' => '1.11', + 'threads' => '2.13', + }, + removed => { + } + }, + 5.025011 => { + delta_from => 5.025010, + changed => { + 'App::Prove' => '3.38', + 'App::Prove::State' => '3.38', + 'App::Prove::State::Result'=> '3.38', + 'App::Prove::State::Result::Test'=> '3.38', + 'B::Op_private' => '5.025011', + 'Compress::Raw::Bzip2' => '2.074', + 'Compress::Raw::Zlib' => '2.074', + 'Compress::Zlib' => '2.074', + 'Config' => '5.025011', + 'Config::Perl::V' => '0.28', + 'Cwd' => '3.67', + 'ExtUtils::ParseXS' => '3.34', + 'ExtUtils::ParseXS::Constants'=> '3.34', + 'ExtUtils::ParseXS::CountLines'=> '3.34', + 'ExtUtils::ParseXS::Eval'=> '3.34', + 'ExtUtils::Typemaps' => '3.34', + 'ExtUtils::Typemaps::Cmd'=> '3.34', + 'ExtUtils::Typemaps::InputMap'=> '3.34', + 'ExtUtils::Typemaps::OutputMap'=> '3.34', + 'ExtUtils::Typemaps::Type'=> '3.34', + 'File::Spec' => '3.67', + 'File::Spec::AmigaOS' => '3.67', + 'File::Spec::Cygwin' => '3.67', + 'File::Spec::Epoc' => '3.67', + 'File::Spec::Functions' => '3.67', + 'File::Spec::Mac' => '3.67', + 'File::Spec::OS2' => '3.67', + 'File::Spec::Unix' => '3.67', + 'File::Spec::VMS' => '3.67', + 'File::Spec::Win32' => '3.67', + 'IO::Compress::Adapter::Bzip2'=> '2.074', + 'IO::Compress::Adapter::Deflate'=> '2.074', + 'IO::Compress::Adapter::Identity'=> '2.074', + 'IO::Compress::Base' => '2.074', + 'IO::Compress::Base::Common'=> '2.074', + 'IO::Compress::Bzip2' => '2.074', + 'IO::Compress::Deflate' => '2.074', + 'IO::Compress::Gzip' => '2.074', + 'IO::Compress::Gzip::Constants'=> '2.074', + 'IO::Compress::RawDeflate'=> '2.074', + 'IO::Compress::Zip' => '2.074', + 'IO::Compress::Zip::Constants'=> '2.074', + 'IO::Compress::Zlib::Constants'=> '2.074', + 'IO::Compress::Zlib::Extra'=> '2.074', + 'IO::Uncompress::Adapter::Bunzip2'=> '2.074', + 'IO::Uncompress::Adapter::Identity'=> '2.074', + 'IO::Uncompress::Adapter::Inflate'=> '2.074', + 'IO::Uncompress::AnyInflate'=> '2.074', + 'IO::Uncompress::AnyUncompress'=> '2.074', + 'IO::Uncompress::Base' => '2.074', + 'IO::Uncompress::Bunzip2'=> '2.074', + 'IO::Uncompress::Gunzip'=> '2.074', + 'IO::Uncompress::Inflate'=> '2.074', + 'IO::Uncompress::RawInflate'=> '2.074', + 'IO::Uncompress::Unzip' => '2.074', + 'Module::CoreList' => '5.20170320', + 'Module::CoreList::TieHashDelta'=> '5.20170230', + 'Module::CoreList::Utils'=> '5.20170320', + 'Pod::Perldoc' => '3.28', + 'Pod::Perldoc::BaseTo' => '3.28', + 'Pod::Perldoc::GetOptsOO'=> '3.28', + 'Pod::Perldoc::ToANSI' => '3.28', + 'Pod::Perldoc::ToChecker'=> '3.28', + 'Pod::Perldoc::ToMan' => '3.28', + 'Pod::Perldoc::ToNroff' => '3.28', + 'Pod::Perldoc::ToPod' => '3.28', + 'Pod::Perldoc::ToRtf' => '3.28', + 'Pod::Perldoc::ToTerm' => '3.28', + 'Pod::Perldoc::ToText' => '3.28', + 'Pod::Perldoc::ToTk' => '3.28', + 'Pod::Perldoc::ToXml' => '3.28', + 'TAP::Base' => '3.38', + 'TAP::Formatter::Base' => '3.38', + 'TAP::Formatter::Color' => '3.38', + 'TAP::Formatter::Console'=> '3.38', + 'TAP::Formatter::Console::ParallelSession'=> '3.38', + 'TAP::Formatter::Console::Session'=> '3.38', + 'TAP::Formatter::File' => '3.38', + 'TAP::Formatter::File::Session'=> '3.38', + 'TAP::Formatter::Session'=> '3.38', + 'TAP::Harness' => '3.38', + 'TAP::Harness::Env' => '3.38', + 'TAP::Object' => '3.38', + 'TAP::Parser' => '3.38', + 'TAP::Parser::Aggregator'=> '3.38', + 'TAP::Parser::Grammar' => '3.38', + 'TAP::Parser::Iterator' => '3.38', + 'TAP::Parser::Iterator::Array'=> '3.38', + 'TAP::Parser::Iterator::Process'=> '3.38', + 'TAP::Parser::Iterator::Stream'=> '3.38', + 'TAP::Parser::IteratorFactory'=> '3.38', + 'TAP::Parser::Multiplexer'=> '3.38', + 'TAP::Parser::Result' => '3.38', + 'TAP::Parser::Result::Bailout'=> '3.38', + 'TAP::Parser::Result::Comment'=> '3.38', + 'TAP::Parser::Result::Plan'=> '3.38', + 'TAP::Parser::Result::Pragma'=> '3.38', + 'TAP::Parser::Result::Test'=> '3.38', + 'TAP::Parser::Result::Unknown'=> '3.38', + 'TAP::Parser::Result::Version'=> '3.38', + 'TAP::Parser::Result::YAML'=> '3.38', + 'TAP::Parser::ResultFactory'=> '3.38', + 'TAP::Parser::Scheduler'=> '3.38', + 'TAP::Parser::Scheduler::Job'=> '3.38', + 'TAP::Parser::Scheduler::Spinner'=> '3.38', + 'TAP::Parser::Source' => '3.38', + 'TAP::Parser::SourceHandler'=> '3.38', + 'TAP::Parser::SourceHandler::Executable'=> '3.38', + 'TAP::Parser::SourceHandler::File'=> '3.38', + 'TAP::Parser::SourceHandler::Handle'=> '3.38', + 'TAP::Parser::SourceHandler::Perl'=> '3.38', + 'TAP::Parser::SourceHandler::RawTAP'=> '3.38', + 'TAP::Parser::YAMLish::Reader'=> '3.38', + 'TAP::Parser::YAMLish::Writer'=> '3.38', + 'Test::Harness' => '3.38', + 'VMS::Stdio' => '2.41', + 'threads' => '2.15', + 'threads::shared' => '1.55', + }, + removed => { + } + }, + 5.025012 => { + delta_from => 5.025011, + changed => { + 'B::Op_private' => '5.025012', + 'CPAN' => '2.18', + 'CPAN::Bundle' => '5.5003', + 'CPAN::Distribution' => '2.18', + 'Config' => '5.025012', + 'DynaLoader' => '1.42', + 'Module::CoreList' => '5.20170420', + 'Module::CoreList::TieHashDelta'=> '5.20170420', + 'Module::CoreList::Utils'=> '5.20170420', + 'Safe' => '2.40', + 'XSLoader' => '0.27', + 'base' => '2.25', + 'threads::shared' => '1.56', + }, + removed => { + } + }, + 5.026000 => { + delta_from => 5.025012, + changed => { + 'B::Op_private' => '5.026000', + 'Config' => '5.026', + 'Module::CoreList' => '5.20170530', + 'Module::CoreList::TieHashDelta'=> '5.20170530', + 'Module::CoreList::Utils'=> '5.20170530', + }, + removed => { + } + }, + 5.027000 => { + delta_from => 5.026000, + changed => { + 'Attribute::Handlers' => '1.00', + 'B::Concise' => '1.000', + 'B::Deparse' => '1.41', + 'B::Op_private' => '5.027000', + 'Config' => '5.027', + 'Module::CoreList' => '5.20170531', + 'Module::CoreList::TieHashDelta'=> '5.20170531', + 'Module::CoreList::Utils'=> '5.20170531', + 'O' => '1.02', + 'attributes' => '0.3', + 'feature' => '1.48', + }, + removed => { + } + }, + 5.027001 => { + delta_from => 5.027, + changed => { + 'App::Prove' => '3.39', + 'App::Prove::State' => '3.39', + 'App::Prove::State::Result'=> '3.39', + 'App::Prove::State::Result::Test'=> '3.39', + 'Archive::Tar' => '2.26', + 'Archive::Tar::Constant'=> '2.26', + 'Archive::Tar::File' => '2.26', + 'B::Op_private' => '5.027001', + 'B::Terse' => '1.08', + 'Config' => '5.027001', + 'Devel::PPPort' => '3.36', + 'DirHandle' => '1.05', + 'ExtUtils::Command' => '7.30', + 'ExtUtils::Command::MM' => '7.30', + 'ExtUtils::Install' => '2.14', + 'ExtUtils::Installed' => '2.14', + 'ExtUtils::Liblist' => '7.30', + 'ExtUtils::Liblist::Kid'=> '7.30', + 'ExtUtils::MM' => '7.30', + 'ExtUtils::MM_AIX' => '7.30', + 'ExtUtils::MM_Any' => '7.30', + 'ExtUtils::MM_BeOS' => '7.30', + 'ExtUtils::MM_Cygwin' => '7.30', + 'ExtUtils::MM_DOS' => '7.30', + 'ExtUtils::MM_Darwin' => '7.30', + 'ExtUtils::MM_MacOS' => '7.30', + 'ExtUtils::MM_NW5' => '7.30', + 'ExtUtils::MM_OS2' => '7.30', + 'ExtUtils::MM_QNX' => '7.30', + 'ExtUtils::MM_UWIN' => '7.30', + 'ExtUtils::MM_Unix' => '7.30', + 'ExtUtils::MM_VMS' => '7.30', + 'ExtUtils::MM_VOS' => '7.30', + 'ExtUtils::MM_Win32' => '7.30', + 'ExtUtils::MM_Win95' => '7.30', + 'ExtUtils::MY' => '7.30', + 'ExtUtils::MakeMaker' => '7.30', + 'ExtUtils::MakeMaker::Config'=> '7.30', + 'ExtUtils::MakeMaker::Locale'=> '7.30', + 'ExtUtils::MakeMaker::version'=> '7.30', + 'ExtUtils::MakeMaker::version::regex'=> '7.30', + 'ExtUtils::Mkbootstrap' => '7.30', + 'ExtUtils::Mksymlists' => '7.30', + 'ExtUtils::Packlist' => '2.14', + 'ExtUtils::testlib' => '7.30', + 'File::Path' => '2.14', + 'Filter::Util::Call' => '1.57', + 'GDBM_File' => '1.16', + 'Getopt::Long' => '2.5', + 'IO::Socket::IP' => '0.39', + 'IPC::Cmd' => '0.98', + 'JSON::PP' => '2.94', + 'JSON::PP::Boolean' => '2.94', + 'Locale::Codes' => '3.52', + 'Locale::Codes::Constants'=> '3.52', + 'Locale::Codes::Country'=> '3.52', + 'Locale::Codes::Country_Codes'=> '3.52', + 'Locale::Codes::Country_Retired'=> '3.52', + 'Locale::Codes::Currency'=> '3.52', + 'Locale::Codes::Currency_Codes'=> '3.52', + 'Locale::Codes::Currency_Retired'=> '3.52', + 'Locale::Codes::LangExt'=> '3.52', + 'Locale::Codes::LangExt_Codes'=> '3.52', + 'Locale::Codes::LangExt_Retired'=> '3.52', + 'Locale::Codes::LangFam'=> '3.52', + 'Locale::Codes::LangFam_Codes'=> '3.52', + 'Locale::Codes::LangFam_Retired'=> '3.52', + 'Locale::Codes::LangVar'=> '3.52', + 'Locale::Codes::LangVar_Codes'=> '3.52', + 'Locale::Codes::LangVar_Retired'=> '3.52', + 'Locale::Codes::Language'=> '3.52', + 'Locale::Codes::Language_Codes'=> '3.52', + 'Locale::Codes::Language_Retired'=> '3.52', + 'Locale::Codes::Script' => '3.52', + 'Locale::Codes::Script_Codes'=> '3.52', + 'Locale::Codes::Script_Retired'=> '3.52', + 'Locale::Country' => '3.52', + 'Locale::Currency' => '3.52', + 'Locale::Language' => '3.52', + 'Locale::Script' => '3.52', + 'Module::CoreList' => '5.20170621', + 'Module::CoreList::TieHashDelta'=> '5.20170621', + 'Module::CoreList::Utils'=> '5.20170621', + 'PerlIO::scalar' => '0.27', + 'PerlIO::via' => '0.17', + 'Storable' => '2.63', + 'TAP::Base' => '3.39', + 'TAP::Formatter::Base' => '3.39', + 'TAP::Formatter::Color' => '3.39', + 'TAP::Formatter::Console'=> '3.39', + 'TAP::Formatter::Console::ParallelSession'=> '3.39', + 'TAP::Formatter::Console::Session'=> '3.39', + 'TAP::Formatter::File' => '3.39', + 'TAP::Formatter::File::Session'=> '3.39', + 'TAP::Formatter::Session'=> '3.39', + 'TAP::Harness' => '3.39', + 'TAP::Harness::Env' => '3.39', + 'TAP::Object' => '3.39', + 'TAP::Parser' => '3.39', + 'TAP::Parser::Aggregator'=> '3.39', + 'TAP::Parser::Grammar' => '3.39', + 'TAP::Parser::Iterator' => '3.39', + 'TAP::Parser::Iterator::Array'=> '3.39', + 'TAP::Parser::Iterator::Process'=> '3.39', + 'TAP::Parser::Iterator::Stream'=> '3.39', + 'TAP::Parser::IteratorFactory'=> '3.39', + 'TAP::Parser::Multiplexer'=> '3.39', + 'TAP::Parser::Result' => '3.39', + 'TAP::Parser::Result::Bailout'=> '3.39', + 'TAP::Parser::Result::Comment'=> '3.39', + 'TAP::Parser::Result::Plan'=> '3.39', + 'TAP::Parser::Result::Pragma'=> '3.39', + 'TAP::Parser::Result::Test'=> '3.39', + 'TAP::Parser::Result::Unknown'=> '3.39', + 'TAP::Parser::Result::Version'=> '3.39', + 'TAP::Parser::Result::YAML'=> '3.39', + 'TAP::Parser::ResultFactory'=> '3.39', + 'TAP::Parser::Scheduler'=> '3.39', + 'TAP::Parser::Scheduler::Job'=> '3.39', + 'TAP::Parser::Scheduler::Spinner'=> '3.39', + 'TAP::Parser::Source' => '3.39', + 'TAP::Parser::SourceHandler'=> '3.39', + 'TAP::Parser::SourceHandler::Executable'=> '3.39', + 'TAP::Parser::SourceHandler::File'=> '3.39', + 'TAP::Parser::SourceHandler::Handle'=> '3.39', + 'TAP::Parser::SourceHandler::Perl'=> '3.39', + 'TAP::Parser::SourceHandler::RawTAP'=> '3.39', + 'TAP::Parser::YAMLish::Reader'=> '3.39', + 'TAP::Parser::YAMLish::Writer'=> '3.39', + 'Test::Harness' => '3.39', + 'XS::APItest' => '0.89', + '_charnames' => '1.45', + 'charnames' => '1.45', + 'if' => '0.0607', + 'mro' => '1.21', + 'threads' => '2.16', + 'threads::shared' => '1.57', + 'version' => '0.9918', + 'version::regex' => '0.9918', + }, + removed => { + } + }, + 5.024002 => { + delta_from => 5.024001, + changed => { + 'B::Op_private' => '5.024002', + 'Config' => '5.024002', + 'Module::CoreList' => '5.20170715_24', + 'Module::CoreList::TieHashDelta'=> '5.20170715_24', + 'Module::CoreList::Utils'=> '5.20170715_24', + 'base' => '2.23_01', + }, + removed => { + } + }, ); sub is_core @@ -14407,8 +14992,71 @@ for my $version (sort { $a <=> $b } keys removed => { } }, + 5.022003 => { + delta_from => 5.022002, + changed => { + }, + removed => { + } + }, 5.024001 => { delta_from => 5.024000, + changed => { + }, + removed => { + } + }, + 5.025009 => { + delta_from => 5.025008, + changed => { + }, + removed => { + } + }, + 5.025010 => { + delta_from => 5.025009, + changed => { + }, + removed => { + } + }, + 5.025011 => { + delta_from => 5.025010, + changed => { + }, + removed => { + } + }, + 5.025012 => { + delta_from => 5.025011, + changed => { + }, + removed => { + } + }, + 5.026000 => { + delta_from => 5.025012, + changed => { + }, + removed => { + } + }, + 5.027000 => { + delta_from => 5.026, + changed => { + }, + removed => { + } + }, + 5.027001 => { + delta_from => 5.027, + changed => { + }, + removed => { + } + }, + 5.024002 => { + delta_from => 5.024001, changed => { }, removed => { Index: gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm,v retrieving revision 1.4 diff -u -p -r1.4 TieHashDelta.pm --- gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm 5 Feb 2017 00:32:09 -0000 1.4 +++ gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/TieHashDelta.pm 11 Aug 2017 22:39:16 -0000 @@ -3,7 +3,7 @@ package Module::CoreList::TieHashDelta; use strict; use vars qw($VERSION); -$VERSION = '5.20170114_24'; +$VERSION = '5.20170715_24'; sub TIEHASH { my ($class, $changed, $removed, $parent) = @_; Index: gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/Utils.pm =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/Utils.pm,v retrieving revision 1.4 diff -u -p -r1.4 Utils.pm --- gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/Utils.pm 5 Feb 2017 00:32:10 -0000 1.4 +++ gnu/usr.bin/perl/dist/Module-CoreList/lib/Module/CoreList/Utils.pm 11 Aug 2017 22:39:16 -0000 @@ -6,7 +6,7 @@ use vars qw[$VERSION %utilities]; use Module::CoreList; use Module::CoreList::TieHashDelta; -$VERSION = '5.20170114_24'; +$VERSION = '5.20170715_24'; sub utilities { my $perl = shift; @@ -1213,8 +1213,73 @@ my %delta = ( removed => { } }, + 5.022003 => { + delta_from => 5.022002, + changed => { + }, + removed => { + } + }, 5.024001 => { delta_from => 5.024000, + changed => { + }, + removed => { + } + }, + 5.025009 => { + delta_from => 5.025008, + changed => { + }, + removed => { + 'c2ph' => 1, + 'pstruct' => 1, + } + }, + 5.025010 => { + delta_from => 5.025009, + changed => { + }, + removed => { + } + }, + 5.025011 => { + delta_from => 5.025010, + changed => { + }, + removed => { + } + }, + 5.025012 => { + delta_from => 5.025011, + changed => { + }, + removed => { + } + }, + 5.026000 => { + delta_from => 5.025012, + changed => { + }, + removed => { + } + }, + 5.027000 => { + delta_from => 5.026000, + changed => { + }, + removed => { + } + }, + 5.027001 => { + delta_from => 5.027000, + changed => { + }, + removed => { + } + }, + 5.024002 => { + delta_from => 5.024001, changed => { }, removed => { Index: gnu/usr.bin/perl/dist/Module-CoreList/t/is_core.t =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/Module-CoreList/t/is_core.t,v retrieving revision 1.3 diff -u -p -r1.3 is_core.t --- gnu/usr.bin/perl/dist/Module-CoreList/t/is_core.t 5 Feb 2017 00:32:10 -0000 1.3 +++ gnu/usr.bin/perl/dist/Module-CoreList/t/is_core.t 11 Aug 2017 22:39:16 -0000 @@ -81,4 +81,4 @@ ok(! Module::CoreList->is_core("CGI", un ok(! Module::CoreList->is_core("CGI", undef, 5.021001), "CGI not in 5.021001"); ok( Module::CoreList::is_core("Config", 0, "5.020"), "Config v0+ is in core in 5.020"); -ok( Module::CoreList::is_core("Config", undef, "5.020"), "Config v(undef) is in core in 7.020"); +ok( Module::CoreList::is_core("Config", undef, "5.020"), "Config v(undef) is in core in 5.020"); Index: gnu/usr.bin/perl/dist/base/lib/base.pm =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/dist/base/lib/base.pm,v retrieving revision 1.4 diff -u -p -r1.4 base.pm --- gnu/usr.bin/perl/dist/base/lib/base.pm 5 Feb 2017 00:33:40 -0000 1.4 +++ gnu/usr.bin/perl/dist/base/lib/base.pm 11 Aug 2017 22:39:16 -0000 @@ -7,10 +7,9 @@ $VERSION = '2.23_01'; $VERSION =~ tr/_//d; # simplest way to avoid indexing of the package: no package statement -sub base::__inc_scope_guard::DESTROY { - my $noop = $_[0][0]; - ref $_ and $_ == $noop and $_ = '.' for @INC; -} +sub base::__inc::unhook { @INC = grep !(ref eq 'CODE' && $_ == $_[0]), @INC } +# instance is blessed array of coderefs to be removed from @INC at scope exit +sub base::__inc::scope_guard::DESTROY { base::__inc::unhook $_ for @{$_[0]} } # constant.pm is slow sub SUCCESS () { 1 } @@ -103,11 +102,53 @@ sub import { { local $SIG{__DIE__}; my $fn = _module_to_filename($base); - my $dotty = $INC[-1] eq '.' && ( $INC[-1] = sub {()} ); + my $dot_hidden; eval { - my $redotty = $dotty && bless [ $dotty ], 'base::__inc_scope_guard'; + my $guard; + if ($INC[-1] eq '.' && %{"$base\::"}) { + # So: the package already exists => this an optional load + # And: there is a dot at the end of @INC => we want to hide it + # However: we only want to hide it during our *own* require() + # (i.e. without affecting nested require()s). + # So we add a hook to @INC whose job is to hide the dot, but which + # first checks checks the callstack depth, because within nested + # require()s the callstack is deeper. + # Since CORE::GLOBAL::require makes it unknowable in advance what + # the exact relevant callstack depth will be, we have to record it + # inside a hook. So we put another hook just for that at the front + # of @INC, where it's guaranteed to run -- immediately. + # The dot-hiding hook does its job by sitting directly in front of + # the dot and removing itself from @INC when reached. This causes + # the dot to move up one index in @INC, causing the loop inside + # pp_require() to skip it. + # Loaded coded may disturb this precise arrangement, but that's OK + # because the hook is inert by that time. It is only active during + # the top-level require(), when @INC is in our control. The only + # possible gotcha is if other hooks already in @INC modify @INC in + # some way during that initial require(). + # Note that this jiggery hookery works just fine recursively: if + # a module loaded via base.pm uses base.pm itself, there will be + # one pair of hooks in @INC per base::import call frame, but the + # pairs from different nestings do not interfere with each other. + my $lvl; + unshift @INC, sub { return if defined $lvl; 1 while defined caller ++$lvl; () }; + splice @INC, -1, 0, sub { return if defined caller $lvl; ++$dot_hidden, &base::__inc::unhook; () }; + $guard = bless [ @INC[0,-2] ], 'base::__inc::scope_guard'; + } require $fn }; + if ($dot_hidden && (my @fn = grep -e && !( -d _ || -b _ ), $fn.'c', $fn)) { + require Carp; + Carp::croak(<]*> (?:line|chunk) [0-9]+)?\.\n\z/; unless (%{"$base\::"}) { require Carp; - my @inc = $dotty ? @INC[0..$#INC-1] : @INC; local $" = " "; - my $e = < 2; +sub array_diff { + my ( $got, $expected ) = @_; + push @$got, ( '(missing)' ) x ( @$expected - @$got ) if @$got < @$expected; + push @$expected, ( '(should not exist)' ) x ( @$got - @$expected ) if @$got > @$expected; + join "\n ", ' All differences:', ( + map +( "got [$_] " . $got->[$_], 'expected'.(' ' x length).$expected->[$_] ), + grep $got->[$_] ne $expected->[$_], + 0 .. $#$got + ); +} -if ($INC[-1] ne '.') { push @INC, '.' } +####################################################################### -my $inc = quotemeta "@INC[0..$#INC-1]"; +use Test::More tests => 8; # some extra tests in t/lib/BaseInc* -eval { 'base'->import("foo") }; -like $@, qr/\@INC contains: $inc\).\)/, - 'Error does not list final dot in @INC (or mention use lib)'; -eval { 'base'->import('t::lib::Dummy') }; -like $@, qr<\@INC contains: $inc\).\n(?x: - ) The file t/lib/Dummy\.pm does exist in the current direct>, - 'special cur dir message for existing files in . that are ignored'; +use lib 't/lib', sub {()}; + +# make it look like an older perl +BEGIN { push @INC, '.' if $INC[-1] ne '.' } + +BEGIN { + my $x = sub { CORE::require $_[0] }; + my $y = sub { &$x }; + my $z = sub { &$y }; + *CORE::GLOBAL::require = $z; +} + +my @expected; BEGIN { @expected = @INC } + +use base 'BaseIncMandatory'; + +BEGIN { + @t::lib::Dummy::ISA = (); # make it look like an optional load + my $success = eval q{use base 't::lib::Dummy'}, my $err = $@; + ok !$success, 'loading optional modules from . using base.pm fails'; + is_deeply \@INC, \@expected, '... without changes to @INC' + or diag array_diff [@INC], [@expected]; + like $err, qr!Base class package "t::lib::Dummy" is not empty but "t/lib/Dummy\.pm" exists in the current directory\.!, + '... and the proper error message'; +} + +BEGIN { @BaseIncOptional::ISA = () } # make it look like an optional load +use base 'BaseIncOptional'; + +BEGIN { + @expected = ( 't/lib/on-head', @expected, 't/lib/on-tail' ); + is_deeply \@INC, \@expected, 'modules loaded by base can extend @INC at both ends' + or diag array_diff [@INC], [@expected]; +} Index: gnu/usr.bin/perl/dist/base/t/lib/BaseIncMandatory.pm =================================================================== RCS file: gnu/usr.bin/perl/dist/base/t/lib/BaseIncMandatory.pm diff -N gnu/usr.bin/perl/dist/base/t/lib/BaseIncMandatory.pm --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ gnu/usr.bin/perl/dist/base/t/lib/BaseIncMandatory.pm 11 Aug 2017 22:39:16 -0000 @@ -0,0 +1,9 @@ +package BaseIncMandatory; + +BEGIN { package main; + is $INC[-1], '.', 'trailing dot remains in @INC during mandatory module load from base'; + ok eval('require t::lib::Dummy'), '... and modules load fine from .' or diag "$@"; + delete $INC{'t/lib/Dummy.pm'}; +} + +1; Index: gnu/usr.bin/perl/dist/base/t/lib/BaseIncOptional.pm =================================================================== RCS file: gnu/usr.bin/perl/dist/base/t/lib/BaseIncOptional.pm diff -N gnu/usr.bin/perl/dist/base/t/lib/BaseIncOptional.pm --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ gnu/usr.bin/perl/dist/base/t/lib/BaseIncOptional.pm 11 Aug 2017 22:39:16 -0000 @@ -0,0 +1,13 @@ +package BaseIncOptional; + +BEGIN { package main; + is $INC[-1], '.', 'trailing dot remains in @INC during optional module load from base'; + ok eval('require t::lib::Dummy'), '... and modules load fine from .' or diag "$@"; + delete $INC{'t/lib/Dummy.pm'}; +} + +use lib 't/lib/on-head'; + +push @INC, 't/lib/on-tail'; + +1; Index: gnu/usr.bin/perl/hints/catamount.sh =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/hints/catamount.sh,v retrieving revision 1.3 diff -u -p -r1.3 catamount.sh --- gnu/usr.bin/perl/hints/catamount.sh 5 Feb 2017 00:32:14 -0000 1.3 +++ gnu/usr.bin/perl/hints/catamount.sh 11 Aug 2017 22:39:16 -0000 @@ -31,11 +31,11 @@ # mkdir -p /opt/perl-catamount # mkdir -p /opt/perl-catamount/include # mkdir -p /opt/perl-catamount/lib -# mkdir -p /opt/perl-catamount/lib/perl5/5.24.1 +# mkdir -p /opt/perl-catamount/lib/perl5/5.24.2 # mkdir -p /opt/perl-catamount/bin # cp *.h /opt/perl-catamount/include # cp libperl.a /opt/perl-catamount/lib -# cp -pr lib/* /opt/perl-catamount/lib/perl5/5.24.1 +# cp -pr lib/* /opt/perl-catamount/lib/perl5/5.24.2 # cp miniperl perl run.sh cc.sh /opt/perl-catamount/lib # # With the headers and the libperl.a you can embed Perl to your Catamount Index: gnu/usr.bin/perl/lib/B/Op_private.pm =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/lib/B/Op_private.pm,v retrieving revision 1.1 diff -u -p -r1.1 Op_private.pm --- gnu/usr.bin/perl/lib/B/Op_private.pm 5 Feb 2017 00:32:15 -0000 1.1 +++ gnu/usr.bin/perl/lib/B/Op_private.pm 11 Aug 2017 22:39:16 -0000 @@ -118,7 +118,7 @@ package B::Op_private; our %bits; -our $VERSION = "5.024001"; +our $VERSION = "5.024002"; $bits{$_}{3} = 'OPpENTERSUB_AMPER' for qw(entersub rv2cv); $bits{$_}{6} = 'OPpENTERSUB_DB' for qw(entersub rv2cv); Index: gnu/usr.bin/perl/plan9/config.plan9 =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/plan9/config.plan9,v retrieving revision 1.18 diff -u -p -r1.18 config.plan9 --- gnu/usr.bin/perl/plan9/config.plan9 5 Feb 2017 00:32:17 -0000 1.18 +++ gnu/usr.bin/perl/plan9/config.plan9 11 Aug 2017 22:39:16 -0000 @@ -3329,8 +3329,8 @@ * This symbol contains the ~name expanded version of PRIVLIB, to be used * in programs that are not prepared to deal with ~ expansion at run-time. */ -#define PRIVLIB "/sys/lib/perl/5.24.1" /**/ -#define PRIVLIB_EXP "/sys/lib/perl/5.24.1" /**/ +#define PRIVLIB "/sys/lib/perl/5.24.2" /**/ +#define PRIVLIB_EXP "/sys/lib/perl/5.24.2" /**/ /* PTRSIZE: * This symbol contains the size of a pointer, so that the C preprocessor @@ -3457,9 +3457,9 @@ * removed. The elements in inc_version_list (inc_version_list.U) can * be tacked onto this variable to generate a list of directories to search. */ -#define SITELIB "/sys/lib/perl/5.24.1/site_perl" /**/ -#define SITELIB_EXP "/sys/lib/perl/5.24.1/site_perl" /**/ -#define SITELIB_STEM "/sys/lib/perl/5.24.1/site_perl" /**/ +#define SITELIB "/sys/lib/perl/5.24.2/site_perl" /**/ +#define SITELIB_EXP "/sys/lib/perl/5.24.2/site_perl" /**/ +#define SITELIB_STEM "/sys/lib/perl/5.24.2/site_perl" /**/ /* Size_t_size: * This symbol holds the size of a Size_t in bytes. Index: gnu/usr.bin/perl/plan9/config_sh.sample =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/plan9/config_sh.sample,v retrieving revision 1.6 diff -u -p -r1.6 config_sh.sample --- gnu/usr.bin/perl/plan9/config_sh.sample 5 Feb 2017 00:32:17 -0000 1.6 +++ gnu/usr.bin/perl/plan9/config_sh.sample 11 Aug 2017 22:39:16 -0000 @@ -36,8 +36,8 @@ api_subversion='0' api_version='24' api_versionstring='5.24.0' ar='ar' -archlib='/sys/lib/perl5/5.24.1/386' -archlibexp='/sys/lib/perl5/5.24.1/386' +archlib='/sys/lib/perl5/5.24.2/386' +archlibexp='/sys/lib/perl5/5.24.2/386' archname64='' archname='386' archobjs='' @@ -802,17 +802,17 @@ inc_version_list=' ' inc_version_list_init='0' incpath='' inews='' -installarchlib='/sys/lib/perl/5.24.1/386' +installarchlib='/sys/lib/perl/5.24.2/386' installbin='/usr/bin' installman1dir='/sys/man/1pub' installman3dir='/sys/man/2pub' installprefix='/usr' installprefixexp='/usr' -installprivlib='/sys/lib/perl/5.24.1' +installprivlib='/sys/lib/perl/5.24.2' installscript='/usr/bin' -installsitearch='/sys/lib/perl/5.24.1/site_perl/386' +installsitearch='/sys/lib/perl/5.24.2/site_perl/386' installsitebin='/usr/bin' -installsitelib='/sys/lib/perl/5.24.1/site_perl' +installsitelib='/sys/lib/perl/5.24.2/site_perl' installstyle='lib/perl5' installusrbinperl='undef' installvendorarch='' @@ -937,8 +937,8 @@ pmake='' pr='' prefix='/usr' prefixexp='/usr' -privlib='/sys/lib/perl/5.24.1' -privlibexp='/sys/lib/perl/5.24.1' +privlib='/sys/lib/perl/5.24.2' +privlibexp='/sys/lib/perl/5.24.2' procselfexe='' prototype='define' ptrsize='4' @@ -1003,13 +1003,13 @@ sig_num='0 1 2 3 4 5 6 7 8 9 10 11 12 13 sig_num_init='0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 0' sig_size='50' signal_t='void' -sitearch='/sys/lib/perl/5.24.1/site_perl/386' +sitearch='/sys/lib/perl/5.24.2/site_perl/386' sitearchexp='/sys/lib/perl/site_perl/386' sitebin='/usr/bin' sitebinexp='/usr/bin' -sitelib='/sys/lib/perl/5.24.1/site_perl' -sitelib_stem='/sys/lib/perl/5.24.1/site_perl' -sitelibexp='/sys/lib/perl/5.24.1/site_perl' +sitelib='/sys/lib/perl/5.24.2/site_perl' +sitelib_stem='/sys/lib/perl/5.24.2/site_perl' +sitelibexp='/sys/lib/perl/5.24.2/site_perl' siteprefix='/usr' siteprefixexp='/usr' sizesize='4' @@ -1042,7 +1042,7 @@ stdio_stream_array='' strerror_r_proto='0' strings='/sys/include/ape/string.h' submit='' -subversion='1' +subversion='2' sysman='/sys/man/1pub' tail='' tar='' @@ -1124,8 +1124,8 @@ vendorlib_stem='' vendorlibexp='' vendorprefix='' vendorprefixexp='' -version='5.24.1' -version_patchlevel_string='version 24 subversion 1' +version='5.24.2' +version_patchlevel_string='version 24 subversion 2' versiononly='undef' vi='' xlibpth='' @@ -1139,7 +1139,7 @@ config_args='' config_argc=0 PERL_REVISION=5 PERL_VERSION=24 -PERL_SUBVERSION=1 +PERL_SUBVERSION=2 PERL_API_REVISION=5 PERL_API_VERSION=24 PERL_API_SUBVERSION=0 Index: gnu/usr.bin/perl/pod/perl.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/pod/perl.pod,v retrieving revision 1.23 diff -u -p -r1.23 perl.pod --- gnu/usr.bin/perl/pod/perl.pod 5 Feb 2017 00:34:36 -0000 1.23 +++ gnu/usr.bin/perl/pod/perl.pod 11 Aug 2017 22:39:16 -0000 @@ -180,7 +180,9 @@ aux c2ph h2ph h2xs perlbug pl2pm pod2htm perlhist Perl history records perldelta Perl changes since previous version + perl5241delta Perl changes in version 5.24.1 perl5240delta Perl changes in version 5.24.0 + perl5223delta Perl changes in version 5.22.3 perl5222delta Perl changes in version 5.22.2 perl5221delta Perl changes in version 5.22.1 perl5220delta Perl changes in version 5.22.0 Index: gnu/usr.bin/perl/pod/perl5223delta.pod =================================================================== RCS file: gnu/usr.bin/perl/pod/perl5223delta.pod diff -N gnu/usr.bin/perl/pod/perl5223delta.pod --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ gnu/usr.bin/perl/pod/perl5223delta.pod 11 Aug 2017 22:39:16 -0000 @@ -0,0 +1,314 @@ +=encoding utf8 + +=head1 NAME + +perl5223delta - what is new for perl v5.22.3 + +=head1 DESCRIPTION + +This document describes differences between the 5.22.2 release and the 5.22.3 +release. + +If you are upgrading from an earlier release such as 5.22.1, first read +L, which describes differences between 5.22.1 and 5.22.2. + +=head1 Security + +=head2 B<-Di> switch is now required for PerlIO debugging output + +Previously PerlIO debugging output would be sent to the file specified by the +C environment variable if perl wasn't running setuid and the +B<-T> or B<-t> switches hadn't been parsed yet. + +If perl performed output at a point where it hadn't yet parsed its switches +this could result in perl creating or overwriting the file named by +C even when the B<-T> switch had been supplied. + +Perl now requires the B<-Di> switch to produce PerlIO debugging output. By +default this is written to C, but can optionally be redirected to a +file by setting the C environment variable. + +If perl is running setuid or the B<-T> switch was supplied C is +ignored and the debugging output is sent to C as for any other B<-D> +switch. + +=head2 Core modules and tools no longer search F<"."> for optional modules + +The tools and many modules supplied in core no longer search the default +current directory entry in L|perlvar/@INC> for optional modules. For +example, L will remove the final F<"."> from C<@INC> before trying to +load L. + +This prevents an attacker injecting an optional module into a process run by +another user where the current directory is writable by the attacker, e.g. the +F directory. + +In most cases this removal should not cause problems, but difficulties were +encountered with L, which treats every module name supplied as optional. +These difficulties have not yet been resolved, so for this release there are no +changes to L. We hope to have a fix for L in Perl 5.22.4. + +To protect your own code from this attack, either remove the default F<"."> +entry from C<@INC> at the start of your script, so: + + #!/usr/bin/perl + use strict; + ... + +becomes: + + #!/usr/bin/perl + BEGIN { pop @INC if $INC[-1] eq '.' } + use strict; + ... + +or for modules, remove F<"."> from a localized C<@INC>, so: + + my $can_foo = eval { require Foo; } + +becomes: + + my $can_foo = eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require Foo; + }; + +=head1 Incompatible Changes + +Other than the security changes above there are no changes intentionally +incompatible with Perl 5.22.2. If any exist, they are bugs, and we request +that you submit a report. See L below. + +=head1 Modules and Pragmata + +=head2 Updated Modules and Pragmata + +=over 4 + +=item * + +L has been upgraded from version 2.04 to 2.04_01. + +=item * + +L has been upgraded from version 0.39 to 0.39_01. + +=item * + +L has been upgraded from version 2.11 to 2.11_01. + +=item * + +L has been upgraded from version 1.17 to 1.17_01. + +=item * + +L has been upgraded from version 5.95 to 5.95_01. + +=item * + +L has been upgraded from version 2.72 to 2.72_01. + +=item * + +L has been upgraded from version 1.20 to 1.20_01. + +=item * + +L has been upgraded from version 7.04_01 to 7.04_02. + +=item * + +L has been upgraded from version 0.48 to 0.48_01. + +=item * + +L has been upgraded from version 3.56_01 to 3.56_02. + +=item * + +L has been upgraded from version 0.054 to 0.054_01. + +=item * + +L has been upgraded from version 1.35 to 1.35_01. + +=item * + +The IO-Compress modules have been upgraded from version 2.068 to 2.068_001. + +=item * + +L has been upgraded from version 0.92 to 0.92_01. + +=item * + +L has been upgraded from version 2.27300 to 2.27300_01. + +=item * + +L has been upgraded from version 1.26 to 1.26_01. + +=item * + +L has been upgraded from version 0.21 to 0.21_01. + +=item * + +L has been upgraded from version 1.03 to 1.03_01. + +=item * + +L has been upgraded from version 5.20160429 to 5.20170114_22. + +=item * + +L has been upgraded from version 2.43 to 2.43_01. + +=item * + +L has been upgraded from version 1.4414 to 1.4414_001. + +=item * + +L has been upgraded from version 1.22 to 1.2201. + +=item * + +L has been upgraded from version 3.25 to 3.25_01. + +=item * + +L has been upgraded from version 2.53_01 to 2.53_02. + +=item * + +L has been upgraded from version 0.33 to 0.33_01. + +=item * + +L has been upgraded from version 1.26 to 1.26_01. + +=item * + +L has been upgraded from version 3.35 to 3.35_01. + +=item * + +L has been upgraded from version 0.20 to 0.20_01, fixing a security +hole in which binary files could be loaded from a path outside of C<@INC>. +L<[perl #128528]|https://rt.perl.org/Public/Bug/Display.html?id=128528> + +=back + +=head1 Documentation + +=head2 Changes to Existing Documentation + +=head3 L + +=over 4 + +=item * + +The documentation of C has been updated. + +=back + +=head3 L + +=over 4 + +=item * + +The new B<-Di> switch has been documented, and the documentation of +C has been updated. + +=back + +=head1 Testing + +=over 4 + +=item * + +A new test script, F, has been added to test that the new +B<-Di> switch is working correctly. + +=back + +=head1 Selected Bug Fixes + +=over 4 + +=item * + +The C macro is an lvalue again. + +=back + +=head1 Acknowledgements + +Perl 5.22.3 represents approximately 9 months of development since Perl 5.22.2 +and contains approximately 4,400 lines of changes across 240 files from 20 +authors. + +Excluding auto-generated files, documentation and release tools, there were +approximately 2,200 lines of changes to 170 .pm, .t, .c and .h files. + +Perl continues to flourish into its third decade thanks to a vibrant community +of users and developers. The following people are known to have contributed +the improvements that became Perl 5.22.3: + +Aaron Crane, Abigail, Alex Vandiver, Aristotle Pagaltzis, Chad Granum, Chris +'BinGOs' Williams, Craig A. Berry, David Mitchell, Father Chrysostomos, James E +Keenan, Jarkko Hietaniemi, Karen Etheridge, Karl Williamson, Matthew Horsfall, +Niko Tyni, Ricardo Signes, Sawyer X, Stevan Little, Steve Hay, Tony Cook. + +The list above is almost certainly incomplete as it is automatically generated +from version control history. In particular, it does not include the names of +the (very much appreciated) contributors who reported issues to the Perl bug +tracker. + +Many of the changes included in this version originated in the CPAN modules +included in Perl's core. We're grateful to the entire CPAN community for +helping Perl to flourish. + +For a more complete list of all of Perl's historical contributors, please see +the F file in the Perl source distribution. + +=head1 Reporting Bugs + +If you find what you think is a bug, you might check the articles recently +posted to the comp.lang.perl.misc newsgroup and the Perl bug database at +https://rt.perl.org/ . There may also be information at http://www.perl.org/ , +the Perl Home Page. + +If you believe you have an unreported bug, please run the L program +included with your release. Be sure to trim your bug down to a tiny but +sufficient test case. Your bug report, along with the output of C, +will be sent off to perlbug@perl.org to be analysed by the Perl porting team. + +If the bug you are reporting has security implications, which make it +inappropriate to send to a publicly archived mailing list, then please send it +to perl5-security-report@perl.org. This points to a closed subscription +unarchived mailing list, which includes all the core committers, who will be +able to help assess the impact of issues, figure out a resolution, and help +co-ordinate the release of patches to mitigate or fix the problem across all +platforms on which Perl is supported. Please only use this address for +security issues in the Perl core, not for modules independently distributed on +CPAN. + +=head1 SEE ALSO + +The F file for an explanation of how to view exhaustive details on +what changed. + +The F file for how to build Perl. + +The F file for general stuff. + +The F and F files for copyright information. + +=cut Index: gnu/usr.bin/perl/pod/perl5241delta.pod =================================================================== RCS file: gnu/usr.bin/perl/pod/perl5241delta.pod diff -N gnu/usr.bin/perl/pod/perl5241delta.pod --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ gnu/usr.bin/perl/pod/perl5241delta.pod 11 Aug 2017 22:39:16 -0000 @@ -0,0 +1,308 @@ +=encoding utf8 + +=head1 NAME + +perl5241delta - what is new for perl v5.24.1 + +=head1 DESCRIPTION + +This document describes differences between the 5.24.0 release and the 5.24.1 +release. + +If you are upgrading from an earlier release such as 5.22.0, first read +L, which describes differences between 5.22.0 and 5.24.0. + +=head1 Security + +=head2 B<-Di> switch is now required for PerlIO debugging output + +Previously PerlIO debugging output would be sent to the file specified by the +C environment variable if perl wasn't running setuid and the +B<-T> or B<-t> switches hadn't been parsed yet. + +If perl performed output at a point where it hadn't yet parsed its switches +this could result in perl creating or overwriting the file named by +C even when the B<-T> switch had been supplied. + +Perl now requires the B<-Di> switch to produce PerlIO debugging output. By +default this is written to C, but can optionally be redirected to a +file by setting the C environment variable. + +If perl is running setuid or the B<-T> switch was supplied C is +ignored and the debugging output is sent to C as for any other B<-D> +switch. + +=head2 Core modules and tools no longer search F<"."> for optional modules + +The tools and many modules supplied in core no longer search the default +current directory entry in L|perlvar/@INC> for optional modules. For +example, L will remove the final F<"."> from C<@INC> before trying to +load L. + +This prevents an attacker injecting an optional module into a process run by +another user where the current directory is writable by the attacker, e.g. the +F directory. + +In most cases this removal should not cause problems, but difficulties were +encountered with L, which treats every module name supplied as optional. +These difficulties have not yet been resolved, so for this release there are no +changes to L. We hope to have a fix for L in Perl 5.24.2. + +To protect your own code from this attack, either remove the default F<"."> +entry from C<@INC> at the start of your script, so: + + #!/usr/bin/perl + use strict; + ... + +becomes: + + #!/usr/bin/perl + BEGIN { pop @INC if $INC[-1] eq '.' } + use strict; + ... + +or for modules, remove F<"."> from a localized C<@INC>, so: + + my $can_foo = eval { require Foo; } + +becomes: + + my $can_foo = eval { + local @INC = @INC; + pop @INC if $INC[-1] eq '.'; + require Foo; + }; + +=head1 Incompatible Changes + +Other than the security changes above there are no changes intentionally +incompatible with Perl 5.24.0. If any exist, they are bugs, and we request +that you submit a report. See L below. + +=head1 Modules and Pragmata + +=head2 Updated Modules and Pragmata + +=over 4 + +=item * + +L has been upgraded from version 2.04 to 2.04_01. + +=item * + +L has been upgraded from version 0.42 to 0.42_01. + +=item * + +L has been upgraded from version 2.11 to 2.11_01. + +=item * + +L has been upgraded from version 1.17 to 1.17_01. + +=item * + +L has been upgraded from version 5.95 to 5.95_01. + +=item * + +L has been upgraded from version 2.80 to 2.80_01. + +=item * + +L has been upgraded from version 7.10_01 to 7.10_02. + +=item * + +L has been upgraded from version 0.48 to 0.48_01. + +=item * + +L has been upgraded from version 3.63 to 3.63_01. + +=item * + +L has been upgraded from version 0.056 to 0.056_001. + +=item * + +L has been upgraded from version 1.36 to 1.36_01. + +=item * + +The IO-Compress modules have been upgraded from version 2.069 to 2.069_001. + +=item * + +L has been upgraded from version 0.92 to 0.92_01. + +=item * + +L has been upgraded from version 2.27300 to 2.27300_01. + +=item * + +L has been upgraded from version 1.26 to 1.26_01. + +=item * + +L has been upgraded from version 0.21 to 0.21_01. + +=item * + +L has been upgraded from version 1.03 to 1.03_01. + +=item * + +L has been upgraded from version 5.20160506 to 5.20170114_24. + +=item * + +L has been upgraded from version 2.43 to 2.43_01. + +=item * + +L has been upgraded from version 1.4417 to 1.4417_001. + +=item * + +L has been upgraded from version 1.22 to 1.2201. + +=item * + +L has been upgraded from version 3.25_02 to 3.25_03. + +=item * + +L has been upgraded from version 2.56 to 2.56_01. + +=item * + +L has been upgraded from version 0.33 to 0.33_01. + +=item * + +L has been upgraded from version 1.28 to 1.28_01. + +=item * + +L has been upgraded from version 3.36 to 3.36_01. + +=item * + +L has been upgraded from version 0.21 to 0.22, fixing a security hole +in which binary files could be loaded from a path outside of C<@INC>. +L<[perl #128528]|https://rt.perl.org/Public/Bug/Display.html?id=128528> + +=back + +=head1 Documentation + +=head2 Changes to Existing Documentation + +=head3 L + +=over 4 + +=item * + +The documentation of C has been updated. + +=back + +=head3 L + +=over 4 + +=item * + +The new B<-Di> switch has been documented, and the documentation of +C has been updated. + +=back + +=head1 Testing + +=over 4 + +=item * + +A new test script, F, has been added to test that the new +B<-Di> switch is working correctly. + +=back + +=head1 Selected Bug Fixes + +=over 4 + +=item * + +The change to hashbang redirection introduced in Perl 5.24.0, whereby perl +would redirect to another interpreter (Perl 6) if it found a hashbang path +which contains "perl" followed by "6", has been reverted because it broke in +cases such as C<#!/opt/perl64/bin/perl>. + +=back + +=head1 Acknowledgements + +Perl 5.24.1 represents approximately 8 months of development since Perl 5.24.0 +and contains approximately 8,100 lines of changes across 240 files from 18 +authors. + +Excluding auto-generated files, documentation and release tools, there were +approximately 2,200 lines of changes to 170 .pm, .t, .c and .h files. + +Perl continues to flourish into its third decade thanks to a vibrant community +of users and developers. The following people are known to have contributed +the improvements that became Perl 5.24.1: + +Aaron Crane, Alex Vandiver, Aristotle Pagaltzis, Chad Granum, Chris 'BinGOs' +Williams, Craig A. Berry, Father Chrysostomos, James E Keenan, Jarkko +Hietaniemi, Karen Etheridge, Leon Timmermans, Matthew Horsfall, Ricardo Signes, +Sawyer X, SĂ©bastien Aperghis-Tramoni, Stevan Little, Steve Hay, Tony Cook. + +The list above is almost certainly incomplete as it is automatically generated +from version control history. In particular, it does not include the names of +the (very much appreciated) contributors who reported issues to the Perl bug +tracker. + +Many of the changes included in this version originated in the CPAN modules +included in Perl's core. We're grateful to the entire CPAN community for +helping Perl to flourish. + +For a more complete list of all of Perl's historical contributors, please see +the F file in the Perl source distribution. + +=head1 Reporting Bugs + +If you find what you think is a bug, you might check the articles recently +posted to the comp.lang.perl.misc newsgroup and the Perl bug database at +L . There may also be information at +L , the Perl Home Page. + +If you believe you have an unreported bug, please run the L program +included with your release. Be sure to trim your bug down to a tiny but +sufficient test case. Your bug report, along with the output of C, +will be sent off to perlbug@perl.org to be analysed by the Perl porting team. + +If the bug you are reporting has security implications which make it +inappropriate to send to a publicly archived mailing list, then see +L for details of how to +report the issue. + +=head1 SEE ALSO + +The F file for an explanation of how to view exhaustive details on +what changed. + +The F file for how to build Perl. + +The F file for general stuff. + +The F and F files for copyright information. + +=cut Index: gnu/usr.bin/perl/pod/perldelta.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/pod/perldelta.pod,v retrieving revision 1.15 diff -u -p -r1.15 perldelta.pod --- gnu/usr.bin/perl/pod/perldelta.pod 5 Feb 2017 00:33:41 -0000 1.15 +++ gnu/usr.bin/perl/pod/perldelta.pod 11 Aug 2017 22:39:16 -0000 @@ -2,114 +2,34 @@ =head1 NAME -perldelta - what is new for perl v5.24.1 +perldelta - what is new for perl v5.24.2 =head1 DESCRIPTION -This document describes differences between the 5.24.0 release and the 5.24.1 +This document describes differences between the 5.24.1 release and the 5.24.2 release. -If you are upgrading from an earlier release such as 5.22.0, first read -L, which describes differences between 5.22.0 and 5.24.0. +If you are upgrading from an earlier release such as 5.24.0, first read +L, which describes differences between 5.24.0 and 5.24.1. =head1 Security -=head2 B<-Di> switch is now required for PerlIO debugging output +=head2 Improved handling of '.' in @INC in base.pm -Previously PerlIO debugging output would be sent to the file specified by the -C environment variable if perl wasn't running setuid and the -B<-T> or B<-t> switches hadn't been parsed yet. - -If perl performed output at a point where it hadn't yet parsed its switches -this could result in perl creating or overwriting the file named by -C even when the B<-T> switch had been supplied. - -Perl now requires the B<-Di> switch to produce PerlIO debugging output. By -default this is written to C, but can optionally be redirected to a -file by setting the C environment variable. - -If perl is running setuid or the B<-T> switch was supplied C is -ignored and the debugging output is sent to C as for any other B<-D> -switch. - -=head2 Core modules and tools no longer search F<"."> for optional modules - -The tools and many modules supplied in core no longer search the default -current directory entry in L|perlvar/@INC> for optional modules. For -example, L will remove the final F<"."> from C<@INC> before trying to -load L. - -This prevents an attacker injecting an optional module into a process run by -another user where the current directory is writable by the attacker, e.g. the -F directory. - -In most cases this removal should not cause problems, the exception being -L. - -L treats every module name supplied as optional. If you have -applications that use L to load non-optional modules from the current -directory you will need to modify your code or environment. - -If your code always trusts the contents of the current directory, the simplest -change is adding F<"."> to C: - - # for Bourne shell and similar - set PERL5LIB=. - export PERL5LIB - -If you do B trust the current directory this will open your code up to -attacks on any module load, not just optional modules. You may want to add the -absolute path of your application's module directory to C instead. - -Alternatively, you can change your code, either to add the directory with your -binary to C<@INC>: - - use FindBin; - use lib $FindBin::Bin; - -or switch to L, which requires an explicit parameter for optional -modules: - - use parent 'Nonoptional::Module'; - -though this will have the same problem if the current directory is removed from -C<@INC> in Perl 5.26. - -Also, since L now localizes C<@INC> when loading modules, changes to -C<@INC> in the loaded module will be discarded when C<@INC> is restored to its -previous value. - -To protect your own code from this attack, either remove the default F<"."> -entry from C<@INC> at the start of your script, so: - - #!/usr/bin/perl - use strict; - ... - -becomes: - - #!/usr/bin/perl - BEGIN { pop @INC if $INC[-1] eq '.' } - use strict; - ... - -or for modules, remove F<"."> from a localized C<@INC>, so: - - my $can_foo = eval { require Foo; } - -becomes: - - my $can_foo = eval { - local @INC = @INC; - pop @INC if $INC[-1] eq '.'; - require Foo; - }; - -=head1 Incompatible Changes - -Other than the security changes above there are no changes intentionally -incompatible with Perl 5.24.0. If any exist, they are bugs, and we request -that you submit a report. See L below. +The handling of (the removal of) C<'.'> in C<@INC> in L has been +improved. This resolves some problematic behaviour in the approach taken in +Perl 5.24.1, which is probably best described in the following two threads on +the Perl 5 Porters mailing list: +L, +L. + +=head2 "Escaped" colons and relative paths in PATH + +On Unix systems, Perl treats any relative paths in the PATH environment +variable as tainted when starting a new process. Previously, it was allowing a +backslash to escape a colon (unlike the OS), consequently allowing relative +paths to be considered safe if the PATH was set to something like C. The +check has been fixed to treat C<.> as tainted in that example. =head1 Modules and Pragmata @@ -119,153 +39,11 @@ that you submit a report. See L has been upgraded from version 2.04 to 2.04_01. - -=item * - L has been upgraded from version 2.23 to 2.23_01. =item * -L has been upgraded from version 0.42 to 0.42_01. - -=item * - -L has been upgraded from version 2.11 to 2.11_01. - -=item * - -L has been upgraded from version 1.17 to 1.17_01. - -=item * - -L has been upgraded from version 5.95 to 5.95_01. - -=item * - -L has been upgraded from version 2.80 to 2.80_01. - -=item * - -L has been upgraded from version 7.10_01 to 7.10_02. - -=item * - -L has been upgraded from version 0.48 to 0.48_01. - -=item * - -L has been upgraded from version 3.63 to 3.63_01. - -=item * - -L has been upgraded from version 0.056 to 0.056_001. - -=item * - -L has been upgraded from version 1.36 to 1.36_01. - -=item * - -The IO-Compress modules have been upgraded from version 2.069 to 2.069_001. - -=item * - -L has been upgraded from version 0.92 to 0.92_01. - -=item * - -L has been upgraded from version 2.27300 to 2.27300_01. - -=item * - -L has been upgraded from version 1.26 to 1.26_01. - -=item * - -L has been upgraded from version 0.21 to 0.21_01. - -=item * - -L has been upgraded from version 1.03 to 1.03_01. - -=item * - -L has been upgraded from version 5.20160506 to 5.20170114_24. - -=item * - -L has been upgraded from version 2.43 to 2.43_01. - -=item * - -L has been upgraded from version 1.4417 to 1.4417_001. - -=item * - -L has been upgraded from version 1.22 to 1.2201. - -=item * - -L has been upgraded from version 3.25_02 to 3.25_03. - -=item * - -L has been upgraded from version 2.56 to 2.56_01. - -=item * - -L has been upgraded from version 0.33 to 0.33_01. - -=item * - -L has been upgraded from version 1.28 to 1.28_01. - -=item * - -L has been upgraded from version 3.36 to 3.36_01. - -=item * - -L has been upgraded from version 0.21 to 0.22, fixing a security hole -in which binary files could be loaded from a path outside of C<@INC>. -L<[perl #128528]|https://rt.perl.org/Public/Bug/Display.html?id=128528> - -=back - -=head1 Documentation - -=head2 Changes to Existing Documentation - -=head3 L - -=over 4 - -=item * - -The documentation of C has been updated. - -=back - -=head3 L - -=over 4 - -=item * - -The new B<-Di> switch has been documented, and the documentation of -C has been updated. - -=back - -=head1 Testing - -=over 4 - -=item * - -A new test script, F, has been added to test that the new -B<-Di> switch is working correctly. +L has been upgraded from version 5.20170114_24 to 5.20170715_24. =back @@ -275,30 +53,29 @@ B<-Di> switch is working correctly. =item * -The change to hashbang redirection introduced in Perl 5.24.0, whereby perl -would redirect to another interpreter (Perl 6) if it found a hashbang path -which contains "perl" followed by "6", has been reverted because it broke in -cases such as C<#!/opt/perl64/bin/perl>. +Fixed a crash with C where it thought it was dealing with UTF-8 when it +wasn't. +L<[perl #129038]|https://rt.perl.org/Ticket/Display.html?id=129038> =back =head1 Acknowledgements -Perl 5.24.1 represents approximately 8 months of development since Perl 5.24.0 -and contains approximately 8,100 lines of changes across 240 files from 18 +Perl 5.24.2 represents approximately 6 months of development since Perl 5.24.1 +and contains approximately 2,500 lines of changes across 53 files from 18 authors. Excluding auto-generated files, documentation and release tools, there were -approximately 2,200 lines of changes to 170 .pm, .t, .c and .h files. +approximately 960 lines of changes to 17 .pm, .t, .c and .h files. Perl continues to flourish into its third decade thanks to a vibrant community of users and developers. The following people are known to have contributed -the improvements that became Perl 5.24.1: +the improvements that became Perl 5.24.2: -Aaron Crane, Alex Vandiver, Aristotle Pagaltzis, Chad Granum, Chris 'BinGOs' -Williams, Craig A. Berry, Father Chrysostomos, James E Keenan, Jarkko -Hietaniemi, Karen Etheridge, Leon Timmermans, Matthew Horsfall, Ricardo Signes, -Sawyer X, SĂ©bastien Aperghis-Tramoni, Stevan Little, Steve Hay, Tony Cook. +Aaron Crane, Abigail, Aristotle Pagaltzis, Chris 'BinGOs' Williams, Dan +Collins, David Mitchell, Eric Herman, Father Chrysostomos, James E Keenan, Karl +Williamson, Lukas Mai, Renee Baecker, Ricardo Signes, Sawyer X, Stevan Little, +Steve Hay, Tony Cook, Yves Orton. The list above is almost certainly incomplete as it is automatically generated from version control history. In particular, it does not include the names of @@ -315,7 +92,7 @@ the F file in the Perl source d =head1 Reporting Bugs If you find what you think is a bug, you might check the articles recently -posted to the comp.lang.perl.misc newsgroup and the Perl bug database at +posted to the comp.lang.perl.misc newsgroup and the perl bug database at L . There may also be information at L , the Perl Home Page. @@ -326,8 +103,8 @@ will be sent off to perlbug@perl.org to If the bug you are reporting has security implications which make it inappropriate to send to a publicly archived mailing list, then see -L for details of how to -report the issue. +L +for details of how to report the issue. =head1 SEE ALSO Index: gnu/usr.bin/perl/pod/perlhist.pod =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/pod/perlhist.pod,v retrieving revision 1.19 diff -u -p -r1.19 perlhist.pod --- gnu/usr.bin/perl/pod/perlhist.pod 5 Feb 2017 00:32:18 -0000 1.19 +++ gnu/usr.bin/perl/pod/perlhist.pod 11 Aug 2017 22:39:16 -0000 @@ -33,7 +33,8 @@ Matt S Trout, David Golden, Florian Ragw Chris C Williams, Zefram, Ævar ArnfjörĂ° Bjarmason, Stevan Little, Dave Rolsky, Max Maischein, Abigail, Jesse Luehrs, Tony Cook, Dominic Hargreaves, Aaron Crane, Aristotle Pagaltzis, Matthew Horsfall, -Peter Martini, Sawyer X, and Chad 'Exodist' Granum. +Peter Martini, Sawyer X, Chad 'Exodist' Granum, Renee BĂ€cker, +and Eric Herman. =head2 PUMPKIN? @@ -573,6 +574,8 @@ the strings?). Steve 5.22.3-RC4 2016-Oct-12 Steve 5.22.3-RC5 2017-Jan-02 Steve 5.22.3 2017-Jan-14 + Steve 5.22.4-RC1 2017-Jul-01 + Steve 5.22.4 2017-Jul-15 Ricardo 5.23.0 2015-Jun-20 The 5.23 development track Matthew 5.23.1 2015-Jul-20 @@ -597,6 +600,8 @@ the strings?). Steve 5.24.1-RC4 2016-Oct-12 Steve 5.24.1-RC5 2017-Jan-02 Steve 5.24.1 2017-Jan-14 + Steve 5.24.2-RC1 2017-Jul-01 + Steve 5.24.2 2017-Jul-15 Ricardo 5.25.0 2016-May-09 The 5.25 development track Sawyer X 5.25.1 2016-May-20 @@ -606,7 +611,18 @@ the strings?). Stevan 5.25.5 2016-Sep-20 Aaron 5.25.6 2016-Oct-20 Chad 5.25.7 2016-Nov-20 - Sawyer 5.25.8 2016-Dec-20 + Sawyer X 5.25.8 2016-Dec-20 + Abigail 5.25.9 2017-Jan-20 + Renee 5.25.10 2017-Feb-20 + Sawyer X 5.25.11 2017-Mar-20 + Sawyer X 5.25.12 2017-Apr-20 + + Sawyer X 5.26.0-RC1 2017-May-11 The 5.26 maintenance track + Sawyer X 5.26.0-RC2 2017-May-23 + Sawyer X 5.26.0 2017-May-30 + + Sawyer X 5.27.0 2017-May-31 The 5.27 development track + Eric 5.27.1 2017-Jun-20 =head2 SELECTED RELEASE SIZES @@ -690,6 +706,7 @@ explained below. 5.20.0 6243 115 1187 75 19499 2701 9620 2457 5145 159 5.22.0 7819 115 1284 77 19121 2635 9772 2434 5615 176 5.24.0 7922 113 1287 77 19535 2677 9994 2465 5702 177 + 5.26.0 9140 121 24925 1200 40643 3017 10514 2614 7854 211 The "core"..."doc" mean the following files from the Perl source code distribution. The glob notation ** means recursively, (.) means @@ -1013,6 +1030,28 @@ the Perl source distribution for somewha vos 8 7 8 7 8 7 win32 1183 64 1201 64 1268 65 x2p 341 19 - - - - + + ====================================================================== + + 5.26.0 + + Configure 593 1 + Cross 122 15 + djgpp 21 7 + h2pl 24 15 + hints 376 87 + mad - - + NetWare 499 61 + os2 552 70 + plan9 322 17 + Porting 1380 73 + qnx 5 4 + symbian 315 54 + utils 578 50 + vms 527 12 + vos 12 7 + win32 1313 65 + x2p - - =head2 SELECTED PATCH SIZES Index: gnu/usr.bin/perl/t/op/taint.t =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/t/op/taint.t,v retrieving revision 1.22 diff -u -p -r1.22 taint.t --- gnu/usr.bin/perl/t/op/taint.t 5 Feb 2017 00:32:20 -0000 1.22 +++ gnu/usr.bin/perl/t/op/taint.t 11 Aug 2017 22:39:16 -0000 @@ -17,7 +17,7 @@ BEGIN { use strict; use Config; -plan tests => 808; +plan tests => 812; $| = 1; @@ -185,6 +185,22 @@ my $TEST = 'TEST'; # Message can be different depending on whether echo # is a builtin or not like($@, qr/^Insecure (?:directory in )?\$ENV\{PATH}/); + } + + # Relative paths in $ENV{PATH} are always implicitly tainted. + SKIP: { + skip "Do these work on VMS?", 4 if $Is_VMS; + skip "Not applicable to DOSish systems", 4 if! $tmp; + + local $ENV{PATH} = '.'; + is(eval { `$echo 1` }, undef); + like($@, qr/^Insecure (?:directory in )?\$ENV\{PATH}/); + + # Backslash should not fool perl into thinking that this is one + # path. + local $ENV{PATH} = '/\:.'; + is(eval { `$echo 1` }, undef); + like($@, qr/^Insecure (?:directory in )?\$ENV\{PATH}/); } SKIP: { Index: gnu/usr.bin/perl/t/porting/customized.dat =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/t/porting/customized.dat,v retrieving revision 1.8 diff -u -p -r1.8 customized.dat --- gnu/usr.bin/perl/t/porting/customized.dat 5 Feb 2017 00:33:41 -0000 1.8 +++ gnu/usr.bin/perl/t/porting/customized.dat 11 Aug 2017 22:39:16 -0000 @@ -57,8 +57,8 @@ ExtUtils::MakeMaker cpan/ExtUtils-MakeMa ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/prereq.t 53bda2c549fd13a6b6c13a070ca6bc79883081c0 ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/vstrings.t 90035a2bdbf45f15b9c3196d072d7cba7e662871 File::Fetch cpan/File-Fetch/lib/File/Fetch.pm bd0b64a1d8ee2ffac39e017f9fa9f78f95514b4d -File::Path cpan/File-Path/lib/File/Path.pm fd8ce4420a0c113d3f47dd3223859743655c1da8 -File::Path cpan/File-Path/t/Path_win32.t 94b9276557ce7f80b91f6fd9bfa7a0cd9bf9683e +File::Path cpan/File-Path/lib/File/Path.pm 7837c0a6c26609714b4fad0deeb82808409b83fe +File::Path cpan/File-Path/t/Path_win32.t bec8cc294d10f141ecdb7f165ef297a2dc27ba2f HTTP::Tiny cpan/HTTP-Tiny/lib/HTTP/Tiny.pm 3c899ab6938b588f6a2823a6aa59edc81fc2a387 IO-Compress cpan/IO-Compress/bin/zipdetails 381ba2a6ae5bd21c8d2e994316e3e13f2f0a4f41 IO-Compress cpan/IO-Compress/lib/Compress/Zlib.pm 58ddedd36889463706d4060589d0c5e6dc497b86 @@ -160,9 +160,8 @@ Test::Harness cpan/Test-Harness/lib/TAP/ Test::Harness cpan/Test-Harness/lib/TAP/Parser/YAMLish/Writer.pm bf1fbfff9720330886651f183959a5db56daeea0 Test::Harness cpan/Test-Harness/lib/Test/Harness.pm da2d76ba673372da129060c9d0adb8cf0d91f9f7 autodie cpan/autodie/t/mkdir.t 9e70d2282a3cc7d76a78bf8144fccba20fb37dac -base dist/base/lib/base.pm 8db115a702f759526b031f90cc572d97086978a6 -version vutil.c 45ff345c3d8424ba63e130a223848f5b336bd87b bignum cpan/bignum/lib/bigint.pm 56330354995409dab5073ea92d749f8727e265db +version vutil.c 45ff345c3d8424ba63e130a223848f5b336bd87b bignum cpan/bignum/lib/bignum.pm e999973f78e6be12282c11bb6328246b31a9576b bignum cpan/bignum/lib/bigrat.pm 7fccc9df30e43dbbae6e5ea91b26c8046545c9a9 bignum cpan/bignum/lib/Math/BigFloat/Trace.pm a6b4b995e18f4083252e6dc72e9bef69671893dd Index: gnu/usr.bin/perl/t/re/subst.t =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/t/re/subst.t,v retrieving revision 1.2 diff -u -p -r1.2 subst.t --- gnu/usr.bin/perl/t/re/subst.t 5 Feb 2017 00:32:21 -0000 1.2 +++ gnu/usr.bin/perl/t/re/subst.t 11 Aug 2017 22:39:16 -0000 @@ -11,7 +11,7 @@ BEGIN { require './loc_tools.pl'; } -plan( tests => 270 ); +plan( tests => 271 ); $_ = 'david'; $a = s/david/rules/r; @@ -1101,4 +1101,21 @@ SKIP: { pos($s) = 2; $s =~ s/..\G//g; is($s, "\x{123}", "#RT 126260 gofs"); +} + +SKIP: { + if (! locales_enabled('LC_CTYPE')) { + skip "Can't test locale", 1; + } + + # To cause breakeage, we need a locale in which \xff matches whatever + # POSIX class is used in the pattern. Easiest is C, with \W. + fresh_perl_is(' use POSIX qw(locale_h); + setlocale(&POSIX::LC_CTYPE, "C"); + my $s = "\xff"; + $s =~ s/\W//l; + print qq(ok$s\n)', + "ok\n", + {stderr => 1 }, + '[perl #129038 ] s/\xff//l no longer crashes'); } Index: gnu/usr.bin/perl/vms/descrip_mms.template =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/vms/descrip_mms.template,v retrieving revision 1.3 diff -u -p -r1.3 descrip_mms.template --- gnu/usr.bin/perl/vms/descrip_mms.template 5 Feb 2017 00:32:21 -0000 1.3 +++ gnu/usr.bin/perl/vms/descrip_mms.template 11 Aug 2017 22:39:16 -0000 @@ -307,7 +307,7 @@ utils : $(utils1) $(utils2) $(utils3) $( extra.pods : miniperl @ @extra_pods.com -PERLDELTA_CURRENT = [.pod]perl5241delta.pod +PERLDELTA_CURRENT = [.pod]perl5242delta.pod $(PERLDELTA_CURRENT) : [.pod]perldelta.pod Copy/NoConfirm/Log $(MMS$SOURCE) $(PERLDELTA_CURRENT) Index: gnu/usr.bin/perl/win32/GNUmakefile =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/win32/GNUmakefile,v retrieving revision 1.2 diff -u -p -r1.2 GNUmakefile --- gnu/usr.bin/perl/win32/GNUmakefile 5 Feb 2017 00:34:36 -0000 1.2 +++ gnu/usr.bin/perl/win32/GNUmakefile 11 Aug 2017 22:39:16 -0000 @@ -67,7 +67,7 @@ INST_TOP := $(INST_DRV)\perl # versioned installation can be obtained by setting INST_TOP above to a # path that includes an arbitrary version string. # -#INST_VER := \5.24.1 +#INST_VER := \5.24.2 # # Comment this out if you DON'T want your perl installation to have @@ -1544,7 +1544,7 @@ utils: $(HAVEMINIPERL) ..\utils\Makefile copy ..\README.tw ..\pod\perltw.pod copy ..\README.vos ..\pod\perlvos.pod copy ..\README.win32 ..\pod\perlwin32.pod - copy ..\pod\perldelta.pod ..\pod\perl5241delta.pod + copy ..\pod\perldelta.pod ..\pod\perl5242delta.pod $(MINIPERL) -I..\lib $(PL2BAT) $(UTILS) $(MINIPERL) -I..\lib ..\autodoc.pl .. $(MINIPERL) -I..\lib ..\pod\perlmodlib.PL -q .. @@ -1640,7 +1640,7 @@ distclean: realclean -if exist $(LIBDIR)\Win32API rmdir /s /q $(LIBDIR)\Win32API -if exist $(LIBDIR)\XS rmdir /s /q $(LIBDIR)\XS -cd $(PODDIR) && del /f *.html *.bat roffitall \ - perl5241delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ + perl5242delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ perlapi.pod perlbs2000.pod perlce.pod perlcn.pod perlcygwin.pod \ perldos.pod perlfreebsd.pod perlhaiku.pod perlhpux.pod \ perlhurd.pod perlintern.pod perlirix.pod perljp.pod perlko.pod \ Index: gnu/usr.bin/perl/win32/Makefile =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/win32/Makefile,v retrieving revision 1.25 diff -u -p -r1.25 Makefile --- gnu/usr.bin/perl/win32/Makefile 5 Feb 2017 00:34:36 -0000 1.25 +++ gnu/usr.bin/perl/win32/Makefile 11 Aug 2017 22:39:16 -0000 @@ -38,7 +38,7 @@ INST_TOP = $(INST_DRV)\perl # versioned installation can be obtained by setting INST_TOP above to a # path that includes an arbitrary version string. # -#INST_VER = \5.24.1 +#INST_VER = \5.24.2 # # Comment this out if you DON'T want your perl installation to have @@ -1215,7 +1215,7 @@ utils: $(PERLEXE) ..\utils\Makefile copy ..\README.tw ..\pod\perltw.pod copy ..\README.vos ..\pod\perlvos.pod copy ..\README.win32 ..\pod\perlwin32.pod - copy ..\pod\perldelta.pod ..\pod\perl5241delta.pod + copy ..\pod\perldelta.pod ..\pod\perl5242delta.pod cd ..\win32 $(PERLEXE) $(PL2BAT) $(UTILS) $(MINIPERL) -I..\lib ..\autodoc.pl .. @@ -1314,7 +1314,7 @@ distclean: realclean -if exist $(LIBDIR)\Win32API rmdir /s /q $(LIBDIR)\Win32API -if exist $(LIBDIR)\XS rmdir /s /q $(LIBDIR)\XS -cd $(PODDIR) && del /f *.html *.bat roffitall \ - perl5241delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ + perl5242delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ perlapi.pod perlbs2000.pod perlce.pod perlcn.pod perlcygwin.pod \ perldos.pod perlfreebsd.pod perlhaiku.pod perlhpux.pod \ perlhurd.pod perlintern.pod perlirix.pod perljp.pod perlko.pod \ Index: gnu/usr.bin/perl/win32/makefile.mk =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/win32/makefile.mk,v retrieving revision 1.25 diff -u -p -r1.25 makefile.mk --- gnu/usr.bin/perl/win32/makefile.mk 5 Feb 2017 00:34:36 -0000 1.25 +++ gnu/usr.bin/perl/win32/makefile.mk 11 Aug 2017 22:39:16 -0000 @@ -44,7 +44,7 @@ INST_TOP *= $(INST_DRV)\perl # versioned installation can be obtained by setting INST_TOP above to a # path that includes an arbitrary version string. # -#INST_VER *= \5.24.1 +#INST_VER *= \5.24.2 # # Comment this out if you DON'T want your perl installation to have @@ -1511,7 +1511,7 @@ utils: $(HAVEMINIPERL) ..\utils\Makefile copy ..\README.tw ..\pod\perltw.pod copy ..\README.vos ..\pod\perlvos.pod copy ..\README.win32 ..\pod\perlwin32.pod - copy ..\pod\perldelta.pod ..\pod\perl5241delta.pod + copy ..\pod\perldelta.pod ..\pod\perl5242delta.pod $(MINIPERL) -I..\lib $(PL2BAT) $(UTILS) $(MINIPERL) -I..\lib ..\autodoc.pl .. $(MINIPERL) -I..\lib ..\pod\perlmodlib.PL -q .. @@ -1609,7 +1609,7 @@ distclean: realclean -if exist $(LIBDIR)\Win32API rmdir /s /q $(LIBDIR)\Win32API -if exist $(LIBDIR)\XS rmdir /s /q $(LIBDIR)\XS -cd $(PODDIR) && del /f *.html *.bat roffitall \ - perl5241delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ + perl5242delta.pod perlaix.pod perlamiga.pod perlandroid.pod \ perlapi.pod perlbs2000.pod perlce.pod perlcn.pod perlcygwin.pod \ perldos.pod perlfreebsd.pod perlhaiku.pod perlhpux.pod \ perlhurd.pod perlintern.pod perlirix.pod perljp.pod perlko.pod \ Index: gnu/usr.bin/perl/win32/pod.mak =================================================================== RCS file: /cvs/src/gnu/usr.bin/perl/win32/pod.mak,v retrieving revision 1.18 diff -u -p -r1.18 pod.mak --- gnu/usr.bin/perl/win32/pod.mak 5 Feb 2017 00:32:22 -0000 1.18 +++ gnu/usr.bin/perl/win32/pod.mak 11 Aug 2017 22:39:16 -0000 @@ -43,8 +43,10 @@ POD = perl.pod \ perl5220delta.pod \ perl5221delta.pod \ perl5222delta.pod \ + perl5223delta.pod \ perl5240delta.pod \ perl5241delta.pod \ + perl5242delta.pod \ perl561delta.pod \ perl56delta.pod \ perl581delta.pod \ @@ -182,8 +184,10 @@ MAN = perl.man \ perl5220delta.man \ perl5221delta.man \ perl5222delta.man \ + perl5223delta.man \ perl5240delta.man \ perl5241delta.man \ + perl5242delta.man \ perl561delta.man \ perl56delta.man \ perl581delta.man \ @@ -321,8 +325,10 @@ HTML = perl.html \ perl5220delta.html \ perl5221delta.html \ perl5222delta.html \ + perl5223delta.html \ perl5240delta.html \ perl5241delta.html \ + perl5242delta.html \ perl561delta.html \ perl56delta.html \ perl581delta.html \ @@ -460,8 +466,10 @@ TEX = perl.tex \ perl5220delta.tex \ perl5221delta.tex \ perl5222delta.tex \ + perl5223delta.tex \ perl5240delta.tex \ perl5241delta.tex \ + perl5242delta.tex \ perl561delta.tex \ perl56delta.tex \ perl581delta.tex \