| line |
true |
false |
branch |
|
37
|
0 |
1 |
if ($arg and $arg eq '-search') |
|
79
|
0 |
0 |
if (defined $name) { } |
|
87
|
0 |
0 |
if (my $aref = $h{'exclude_list'}) |
|
93
|
0 |
0 |
unless ($array) |
|
98
|
0 |
0 |
unless ($array) |
|
101
|
0 |
0 |
if (@$array == 0) |
|
109
|
0 |
0 |
if ($use_mmap and not defined $stripped_mmap) |
|
112
|
0 |
0 |
if (eval {
do {
require File::Map;
File::Map::map_file($stripped_mmap, $stripped_filename);
1
}
}) { } |
|
117
|
0 |
0 |
if ($verbose) |
|
122
|
0 |
0 |
if ($use_mmap eq 'if_possible') { } |
|
123
|
0 |
0 |
if ($verbose >= 2) |
|
134
|
0 |
0 |
unless ($use_mmap) |
|
144
|
0 |
0 |
if (length $str > 50 and $i != $#$array) |
|
152
|
0 |
0 |
if (defined(my $value = _constant_array(@$array))) |
|
153
|
0 |
0 |
if ($value != 0 and abs $value <= 1000) |
|
159
|
0 |
0 |
if (defined(my $diff = _constant_diff(@$array))) |
|
160
|
0 |
0 |
if (abs $diff < 20 and abs $array->[0] < 100) |
|
166
|
0 |
0 |
if ($verbose) |
|
179
|
0 |
0 |
$h{'try_abs'} ? : |
|
|
0 |
0 |
$h{'_EXPERIMENTAL_exact'} ? : |
|
190
|
0 |
0 |
if $count |
|
192
|
0 |
0 |
if ($mung eq 'none') { } |
|
|
0 |
0 |
elsif ($mung eq 'trim') { } |
|
|
0 |
0 |
elsif ($mung eq 'negate') { } |
|
|
0 |
0 |
elsif ($mung eq 'half') { } |
|
|
0 |
0 |
elsif ($mung eq 'quarter') { } |
|
|
0 |
0 |
elsif ($mung eq 'double') { } |
|
|
0 |
0 |
elsif ($mung eq 'abs') { } |
|
201
|
0 |
0 |
if (@$array) |
|
208
|
0 |
0 |
if (_aref_any_nonzero($array) and @$array >= 3 || length join(',', @$array) >= 5) { } |
|
220
|
0 |
0 |
unless ($value eq '0' or $value =~ s/^-//) |
|
231
|
0 |
0 |
if ($value % 2) |
|
232
|
0 |
0 |
if ($verbose) |
|
245
|
0 |
0 |
if ($value % 4) |
|
246
|
0 |
0 |
if ($verbose) |
|
267
|
0 |
0 |
unless ($any_negative) |
|
268
|
0 |
0 |
if ($verbose) |
|
273
|
0 |
0 |
if (_constant_array(@$array)) |
|
274
|
0 |
0 |
if ($verbose) |
|
285
|
0 |
0 |
if ($h{'_EXPERIMENTAL_exact'}) |
|
289
|
0 |
0 |
if ($use_mmap) { } |
|
293
|
0 |
0 |
unless seek $fh, 0, 0 |
|
300
|
0 |
0 |
if ($use_mmap) { } |
|
303
|
0 |
0 |
unless $stripped_mmap =~ /$re/g |
|
346
|
0 |
0 |
if ($block =~ /$re/g) |
|
356
|
0 |
0 |
unless defined $block |
|
364
|
0 |
0 |
unless my($anum, $found_values_str) = 'Math::OEIS::Stripped'->line_split_anum($line) |
|
369
|
0 |
0 |
if (exists $exclude{$anum}) |
|
375
|
0 |
0 |
if (defined $values_min or defined $values_max) |
|
377
|
0 |
0 |
if (defined $values_min and grep {$_ < $values_min;} @found_values or defined $values_max and grep {$_ > $values_max;} @found_values) |
|
384
|
0 |
0 |
if (defined $max_matches and $count >= $max_matches) |
|
392
|
0 |
0 |
if ($show_mung and @orig_mung_desc || @mung_desc) |
|
398
|
0 |
0 |
unless (defined $anum_name) |
|
405
|
0 |
0 |
if ($count == 0) |
|
406
|
0 |
0 |
if ($verbose) |
|
410
|
0 |
0 |
if ($count or $verbose) |
|
424
|
0 |
7 |
unless (defined $len) |
|
427
|
4 |
3 |
unless ($len) |
|
430
|
2 |
2 |
if (length $block) { } |
|
437
|
0 |
3 |
if ($end >= 0) |
|
462
|
0 |
0 |
if (length $re > 400) |
|
473
|
0 |
0 |
if ($i >= 15 or length $re > 40) |
|
491
|
0 |
0 |
unless (@_) |
|
498
|
0 |
0 |
if ($next_value - $value != $diff) |
|
514
|
0 |
0 |
if ($next_value != $value) |
|
525
|
0 |
0 |
if ($value) |
|
535
|
0 |
0 |
if (length $n < $length_limit) |