| line |
true |
false |
branch |
|
31
|
0 |
0 |
if $DEBUG |
|
32
|
0 |
0 |
unless ($ratio and _is_numeric($ratio) and $ratio > 0 and $ratio < 1) |
|
35
|
0 |
0 |
unless ($arryref and ref $arryref and ref $arryref eq 'ARRAY') |
|
46
|
0 |
0 |
if ($DEBUG) |
|
56
|
0 |
0 |
if ($DEBUG) |
|
66
|
0 |
0 |
if ($DEBUG) |
|
67
|
0 |
0 |
if (defined $ratio) { } |
|
74
|
0 |
0 |
if defined $ratio |
|
79
|
0 |
0 |
if (scalar @soln) |
|
82
|
0 |
0 |
if $DEBUG |
|
89
|
0 |
0 |
if (defined $ratio) |
|
92
|
0 |
0 |
if $DEBUG |
|
118
|
0 |
0 |
if ($DEBUG) |
|
119
|
0 |
0 |
if (defined $ratio) { } |
|
127
|
0 |
0 |
if ($DEBUG) |
|
133
|
0 |
0 |
if (defined $ratio) { } |
|
145
|
0 |
0 |
if ($ratio >= 0 and scalar @solns > 0) |
|
153
|
0 |
0 |
if (scalar @solns) |
|
163
|
0 |
0 |
if ($num < $#solns) { } |
|
169
|
0 |
0 |
if (scalar @{$solns[$num];} > 0) |
|
171
|
0 |
0 |
if ($splitlen > 0) |
|
180
|
0 |
0 |
if (length $regex > 2 and length $regex_annex) |
|
224
|
0 |
0 |
unless /^\d+$/ |
|
226
|
0 |
0 |
if ($_ > $max) |
|
245
|
0 |
0 |
if ($bestscore == 0) |
|
257
|
0 |
0 |
unless defined $ref |
|
258
|
0 |
0 |
if ($score == 0) |
|
259
|
0 |
0 |
if ($score < $bestscore) |
|
277
|
0 |
0 |
unless $val < $max |
|
278
|
0 |
0 |
if ($val + $sum <= $target) { } |
|
288
|
0 |
0 |
unless (defined $min) |
|
305
|
0 |
0 |
if ($$data{$datkey} == $solkey) |
|
314
|
0 |
0 |
if (defined $target) |
|
318
|
0 |
0 |
if ($min >= $$data{$leftkey}) |
|
332
|
0 |
0 |
unless ($test =~ /^-?(?:\d+(?:\.\d*)?|\.\d+)$/) |
|
342
|
0 |
0 |
if ($^W) |
|
356
|
0 |
0 |
if ((split(/,/, $list[$num], 0))[-1] == $list[$num + 1] - 1) { } |
|
357
|
0 |
0 |
if ($list[$num] =~ /^\d+$/) { } |