X-Git-Url: https://git.distorted.org.uk/~mdw/sgt/puzzles/blobdiff_plain/d09d659f14a384693b61090cf1445a419db8cdfe..HEAD:/winiss.pl

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 (<LST>) {
     chomp;
-    split /:/;
+    @_ = split /:/;
     push @exes, $_[0];
     $names{$_[0]} = $_[1];
 }