| line |
true |
false |
branch |
|
160
|
0 |
53 |
unless my $fh = 'IO::File'->new($file) |
|
162
|
0 |
53 |
if $self->{'debug'} |
|
170
|
3009 |
33639 |
if (index($line, '>') == 0) { } |
|
|
89 |
33550 |
elsif (not $line =~ /\S/) { } |
|
171
|
3008 |
1 |
if ($line =~ /^>(\S+)/) { } |
|
173
|
0 |
3008 |
if $self->{'debug'} and ++$count % 1000 == 0 |
|
180
|
2956 |
52 |
if (@ids) |
|
207
|
0 |
27556 |
if ($l3_len > 0 and $l2_len > 0 and $l3_len != $l2_len) |
|
213
|
1 |
33549 |
if ($blank_lines) |
|
229
|
51 |
0 |
if (@ids) |
|
231
|
11 |
40 |
if ($linelen == 0) { } |
|
234
|
0 |
40 |
unless ($last_line =~ /\s$/) |
|
283
|
0 |
29 |
unless defined $id |
|
288
|
1 |
28 |
unless my $fh = $self->_fh($id) |
|
297
|
7 |
21 |
if ($strand == -1) |
|
328
|
0 |
2 |
unless defined $id |
|
332
|
0 |
2 |
unless my $fh = $self->_fh($id) |
|
393
|
0 |
2 |
if $stop < $start |
|
394
|
2 |
0 |
if ($self->{'start'} <= $self->{'stop'}) { } |
|
446
|
1 |
1 |
$self->{'start'} < $self->{'stop'} ? : |