| 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) |
|
177
|
0 |
0 |
$h{'try_abs'} ? : |
|
|
0 |
0 |
$h{'_EXPERIMENTAL_exact'} ? : |
|
188
|
0 |
0 |
if $count |
|
190
|
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') { } |
|
199
|
0 |
0 |
if (@$array) |
|
205
|
0 |
0 |
if (_aref_any_nonzero($array) and @$array >= 3 || length join(',', @$array) >= 5) { } |
|
216
|
0 |
0 |
unless ($value eq '0' or $value =~ s/^-//) |
|
226
|
0 |
0 |
if ($value % 2) |
|
227
|
0 |
0 |
if ($verbose) |
|
239
|
0 |
0 |
if ($value % 4) |
|
240
|
0 |
0 |
if ($verbose) |
|
259
|
0 |
0 |
unless ($any_negative) |
|
260
|
0 |
0 |
if ($verbose) |
|
265
|
0 |
0 |
if (_constant_array(@$array)) |
|
266
|
0 |
0 |
if ($verbose) |
|
274
|
0 |
0 |
if ($h{'_EXPERIMENTAL_exact'}) |
|
278
|
0 |
0 |
if ($use_mmap) { } |
|
282
|
0 |
0 |
unless seek $fh, 0, 0 |
|
289
|
0 |
0 |
if ($use_mmap) { } |
|
292
|
0 |
0 |
unless $stripped_mmap =~ /$re/g |
|
335
|
0 |
0 |
if ($block =~ /$re/g) |
|
345
|
0 |
0 |
unless defined $block |
|
353
|
0 |
0 |
unless my($anum, $found_values_str) = 'Math::OEIS::Stripped'->line_split_anum($line) |
|
358
|
0 |
0 |
if (exists $exclude{$anum}) |
|
364
|
0 |
0 |
if (defined $values_min or defined $values_max) |
|
366
|
0 |
0 |
if (defined $values_min and grep {$_ < $values_min;} @found_values or defined $values_max and grep {$_ > $values_max;} @found_values) |
|
373
|
0 |
0 |
if (defined $max_matches and $count >= $max_matches) |
|
385
|
0 |
0 |
unless (defined $anum_name) |
|
392
|
0 |
0 |
if ($count == 0) |
|
393
|
0 |
0 |
if ($verbose) |
|
397
|
0 |
0 |
if ($count or $verbose) |
|
411
|
0 |
7 |
unless (defined $len) |
|
414
|
4 |
3 |
unless ($len) |
|
417
|
2 |
2 |
if (length $block) { } |
|
424
|
0 |
3 |
if ($end >= 0) |
|
449
|
0 |
0 |
if (length $re > 400) |
|
460
|
0 |
0 |
if ($i >= 15 or length $re > 40) |
|
478
|
0 |
0 |
unless (@_) |
|
485
|
0 |
0 |
if ($next_value - $value != $diff) |
|
501
|
0 |
0 |
if ($next_value != $value) |
|
512
|
0 |
0 |
if ($value) |
|
522
|
0 |
0 |
if (length $n < $length_limit) |