~mdw
/
sgt
/
puzzles
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
New puzzle! Contributed by Steffen Bauer, an implementation of
[sgt/puzzles]
/
winiss.pl
diff --git
a/winiss.pl
b/winiss.pl
index
bd2ac05
..
7416ace
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.
# 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;
$rev = shift @ARGV;
($revclean=$rev) =~ s/M$//;
$lst = shift @ARGV;
open LST, "<", $lst;
while (<LST>) {
chomp;
- split /:/;
+
@_ =
split /:/;
push @exes, $_[0];
$names{$_[0]} = $_[1];
}
push @exes, $_[0];
$names{$_[0]} = $_[1];
}