line |
true |
false |
branch |
91
|
5 |
0 |
if (not defined $self->sequence_factory) |
113
|
8 |
60 |
if ($entry =~ /^BEGIN_SEQUENCE\s+(\S+)/) { } |
|
6 |
54 |
elsif ($entry =~ /^BEGIN_COMMENT/) { } |
|
6 |
48 |
elsif ($entry =~ /^BEGIN_DNA/) { } |
|
6 |
42 |
elsif ($entry =~ /^END_SEQUENCE/) { } |
|
4 |
38 |
elsif ($entry =~ /^WR\{/) { } |
114
|
2 |
6 |
if (defined $seq) { } |
131
|
64 |
18 |
if ($entry =~ /^(\w+):\s+(.+)$/) { } |
|
6 |
12 |
elsif ($entry =~ /^END_COMMENT/) { } |
149
|
5486 |
6 |
if ($entry =~ /(\S+)\s+(\S+)\s+(\S+)/) { } |
|
6 |
0 |
elsif ($entry =~ /^END_DNA/) { } |
153
|
5486 |
0 |
if defined $3 |
224
|
2 |
8 |
unless $swq->attribute($_->[0]) |
232
|
1 |
0 |
if $self->_flush_on_write and defined $self->_fh |
249
|
0 |
1 |
unless ref $swq eq 'Bio::Seq::Quality' |
252
|
0 |
1 |
unless $swq->length ne 'DIFFERENT' |
266
|
1 |
0 |
if $self->_flush_on_write and defined $self->_fh |
288
|
18 |
162 |
if $_->tagname eq $name |
292
|
0 |
18 |
unless (defined $attribute{$name}) |
300
|
14 |
4 |
unless defined $value |