[tex-live] install-tl, tlutils.pm fail with perl 5.21.5

[Norbert Preining]

On Mon, 20 Oct 2014, Nathan Royce wrote:
> ~/Desktop/texlive/Master$ ./install-tlCan't modify split in chomp at tlpkg/TeXLive/TLUtils.pm line 2073, near "))"BEGIN not safe after errors--compilation aborted at tlpkg/TeXLive/TLUtils.pm line 3943.Compilation failed in require at ./install-tl line 53.BEGIN failed--compilation aborted at ./install-tl line 53.


Does this help:
Index: TLUtils.pm
===================================================================
--- TLUtils.pm	(revision 35400)
+++ TLUtils.pm	(working copy)
@@ -2070,7 +2070,8 @@
   if (-w  $sys_man && -d "$Master/texmf-dist/doc/man") {
     debug("$mode symlinks for man pages in $sys_man\n");
     my $foo = `(cd "$Master/texmf-dist/doc/man" && echo *)`;
-    chomp (my @mans = split (' ', $foo));
+    (my @mans = split (' ', $foo);
+    chomp (@mans);
     foreach my $m (@mans) {
       my $mandir = "$Master/texmf-dist/doc/man/$m";
       next unless -d $mandir;


I don't know why perl 5.21 is so stupid about the above code, I don't
see anything wrong, but alas, perl ...

Norbert

------------------------------------------------------------------------
PREINING, Norbert                               http://www.preining.info
JAIST, Japan                                 TeX Live & Debian Developer
GPG: 0x860CDC13   fp: F7D8 A928 26E3 16A1 9FA0  ACF0 6CAC A448 860C DC13
------------------------------------------------------------------------