X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=quacks-ingredients-counts;fp=quacks-ingredients-counts;h=a96ac16cba843ebea62a634506ecfc8903254d65;hb=ecb430c5830b451030da4cdb514f094c9703e808;hp=46d7f1bee8c294027a22e71bca1eeaa1627866b3;hpb=c8d10b1959359d727f4fa1daf42c5985d6bf46d1;p=reprap-play.git diff --git a/quacks-ingredients-counts b/quacks-ingredients-counts index 46d7f1b..a96ac16 100755 --- 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' ? $` + $' :