Fix implicit split to @_. Also add 'use warnings', which would have

spotted it for me.

[originally from svn r9605]

diff --git a/winiss.pl b/winiss.pl
index bd2ac05e824e642db045238be9d52567faa27a3e..7416ace0a2c91224e374098433da92641201a8be 100755 (executable)
--- 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 (<LST>) {
     chomp;
-    split /:/;
+    @_ = split /:/;
     push @exes, $_[0];
     $names{$_[0]} = $_[1];
 }