chiark
/
gitweb
/
~ianmdlvl
/
reprap-play.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
quacks-ingredients: -counts: Detect bad DATA (no + in entry)
[reprap-play.git]
/
quacks-ingredients-counts
diff --git
a/quacks-ingredients-counts
b/quacks-ingredients-counts
index 46d7f1bee8c294027a22e71bca1eeaa1627866b3..a96ac16cba843ebea62a634506ecfc8903254d65 100755
(executable)
--- a/
quacks-ingredients-counts
+++ b/
quacks-ingredients-counts
@@
-36,7
+36,7
@@
foreach my $nspots (qw(1 2 3 4)) {
foreach my $i (0..$#names) {
$_ = $l[$i] || '0+0';
$_ ||= 0;
- m/\+/;
+ m/\+/
or die "$which $nspots ?"
;
$count{$names[$i]}{$nspots} =
$which eq 'All' ? $` + $' :