| line |
true |
false |
branch |
|
153
|
4 |
41 |
if ($words =~ /(.+)\s+$Exp_pat\s+(.+)/) { } |
|
158
|
0 |
4 |
unless defined $num1 and defined $num2 |
|
163
|
0 |
41 |
unless defined $num1 |
|
173
|
8 |
41 |
if ($words =~ /^\s*$Neg_pat\s+(.+)/) { } |
|
|
1 |
40 |
elsif ($words =~ /^\s*$Pos_pat\s+(.+)/) { } |
|
176
|
0 |
8 |
unless defined $num1 |
|
182
|
0 |
1 |
unless defined $num1 |
|
188
|
0 |
40 |
unless defined $num1 |
|
198
|
8 |
41 |
if ($words =~ /(.+)\s+$Dec_pat\s+(.+)/) { } |
|
203
|
0 |
8 |
unless defined $num1 and defined $num2 |
|
208
|
0 |
41 |
unless defined $num1 |
|
223
|
0 |
49 |
if $words[0] eq 'ERR' |
|
227
|
65 |
70 |
if (defined $Digits{$w}) { } |
|
|
13 |
57 |
elsif (looks_like_number $w) { } |
|
|
6 |
51 |
elsif ($w =~ /^$Teen_pat$/) { } |
|
230
|
65 |
0 |
unless ($seen_digits and do {
push @nums, 10 * pop(@nums) + $Digits{$w}
}) |
|
235
|
0 |
13 |
if $seen_digits |
|
242
|
0 |
6 |
unless $seen_digits |
|
249
|
0 |
51 |
unless defined $Mults{$w} |
|
250
|
0 |
51 |
unless @nums |
|
256
|
19 |
32 |
if ($a > $Mults{$w}) |
|
276
|
0 |
15 |
if $words[0] eq 'ERR' |
|
280
|
4 |
34 |
if (looks_like_number $w) { } |
|
283
|
0 |
34 |
unless defined $Digits{$w} |
|
301
|
17 |
136 |
if ($w =~ /^([-+]?[0-9.,]+(?:[Ee][+-]?\d+)?)(\D?.*)$/) { } |
|
|
18 |
118 |
elsif ($w =~ /^($Se_pat)($Mult_pat)$/ and defined $Words{$1}) { } |
|
|
0 |
118 |
elsif ($w =~ /^(.+)\s+($Mult_pat)$/ and defined $Words{$1}) { } |
|
|
118 |
0 |
elsif (defined $Words{$w}) { } |
|
305
|
0 |
17 |
unless (defined $n) |
|
310
|
2 |
15 |
if length $w2 |