line |
true |
false |
branch |
102
|
20 |
12 |
$bs > 3 ? : |
111
|
0 |
32 |
unless defined $string |
136
|
1296 |
521387 |
if ($h % $bs == $bs - 1 and length $hash1 < 63) |
149
|
608 |
522075 |
if ($h % (2 * $bs) == 2 * $bs - 1 and length $hash2 < 31) |
182
|
32 |
5 |
if $bs <= 3 or length $hash1 >= 32 |
185
|
1 |
4 |
unless $bs > 3 |
189
|
2 |
30 |
wantarray ? : |
201
|
0 |
2 |
unless open my $fh, '<', $file |
215
|
25 |
481 |
unless $strings =~ /$re/ |
229
|
3 |
22 |
unless length _lcss($a, $b) >= $min_lcs |
240
|
0 |
22 |
if $dist > 100 |
251
|
1 |
18 |
ref $_[0] eq 'ARRAY' ? : |
252
|
1 |
18 |
ref $_[1] eq 'ARRAY' ? : |
255
|
0 |
19 |
if (@hashA != 3 or not $hashA[0] =~ /\d+/) |
260
|
0 |
19 |
if (@hashB != 3 or not $hashB[0] =~ /\d+/) |
280
|
7 |
12 |
if ($hashA[0] == $hashB[0]) { } |
|
6 |
6 |
elsif ($hashA[0] == 2 * $hashB[0]) { } |
|
5 |
1 |
elsif (2 * $hashA[0] == $hashB[0]) { } |