From: simon Date: Fri, 17 Aug 2012 19:45:03 +0000 (+0000) Subject: Fix implicit split to @_. Also add 'use warnings', which would have X-Git-Url: https://git.distorted.org.uk/~mdw/sgt/puzzles/commitdiff_plain/32cabe4cb86531a3a71a57853a03cc6771b319ac Fix implicit split to @_. Also add 'use warnings', which would have spotted it for me. git-svn-id: svn://svn.tartarus.org/sgt/puzzles@9605 cda61777-01e9-0310-a592-d414129be87e --- diff --git a/winiss.pl b/winiss.pl index bd2ac05..7416ace 100755 --- a/winiss.pl +++ b/winiss.pl @@ -11,13 +11,15 @@ # where `1234' is the revision number which will be encoded in the # installer's version indicators. +use warnings; + $rev = shift @ARGV; ($revclean=$rev) =~ s/M$//; $lst = shift @ARGV; open LST, "<", $lst; while () { chomp; - split /:/; + @_ = split /:/; push @exes, $_[0]; $names{$_[0]} = $_[1]; }