| line |
true |
false |
branch |
|
174
|
0 |
9 |
unless my $fh = 'IO::File'->new($file) |
|
176
|
0 |
9 |
if $self->{'debug'} |
|
184
|
45 |
45 |
if (index($line, '>') == 0) { } |
|
|
0 |
45 |
elsif (not $line =~ /\S/) { } |
|
185
|
45 |
0 |
if ($line =~ /^>(\S+)/) { } |
|
187
|
0 |
45 |
if $self->{'debug'} and ++$count % 1000 == 0 |
|
190
|
36 |
9 |
if (@ids) |
|
217
|
0 |
0 |
if ($l3_len > 0 and $l2_len > 0 and $l3_len != $l2_len) |
|
223
|
0 |
45 |
if ($blank_lines) |
|
239
|
9 |
0 |
if (@ids) |
|
241
|
0 |
9 |
if ($linelen == 0) { } |
|
244
|
0 |
9 |
unless ($last_line =~ /\s$/) |
|
322
|
0 |
16 |
unless defined $id |
|
330
|
0 |
16 |
unless my $fh = $self->_fh($id) |
|
340
|
16 |
0 |
if $start or $stop |
|
342
|
16 |
0 |
if ($subqual or $strand == -1) { } |
|
345
|
0 |
16 |
if $start < 1 |
|
346
|
0 |
16 |
if $stop > $length |
|
347
|
10 |
6 |
if $stop != $length |
|
349
|
4 |
12 |
if $strand == -1 |
|
373
|
0 |
2 |
unless defined $id |
|
377
|
0 |
2 |
unless my $fh = $self->_fh($id) |
|
439
|
0 |
3 |
if $start > $stop |
|
443
|
3 |
0 |
if ($self->{'start'} <= $self->{'stop'}) { } |
|
481
|
2 |
1 |
$self->{'start'} < $self->{'stop'} ? : |