| line |
true |
false |
branch |
|
18
|
1 |
1 |
ref $_[0] ? : |
|
22
|
0 |
1 |
ref $_[0] ? : |
|
23
|
0 |
1 |
if -e $$arg{'wd'} and not -d $$arg{'wd'} |
|
53
|
0 |
1 |
unless open F, $$pkg{'wd'} . '/seqs' |
|
87
|
0 |
676 |
unless defined $fh{$_} |
|
112
|
75266 |
405807 |
if ($abspos >= $$pkg{'acclen'}[$i]) |
|
139
|
635 |
43410 |
if length $str_a != $len or length $str_b != $len |
|
140
|
34235 |
9175 |
if $str_a ne $str_b |
|
150
|
0 |
1 |
unless $$pkg{'built'} |
|
151
|
0 |
1 |
unless $length >= 3 |
|
152
|
1 |
0 |
ref $length ? : |
|
156
|
308 |
368 |
unless -s $$pkg{'wd'} . "/idx.$_" |
|
157
|
0 |
368 |
unless open F, $$pkg{'wd'} . "/idx.$_" |
|
163
|
0 |
4122 |
if $checked{$prev} |
|
165
|
37633 |
42091 |
if ($this - $prev > min(@{$$pkg{'length'};})) |
|
167
|
37633 |
0 |
if (ref $occs) |
|
186
|
0 |
1 |
unless open R, $$pkg{'wd'} . '/result' |