| line |
true |
false |
branch |
|
104
|
40 |
0 |
unless (defined $self->sequence_factory) |
|
124
|
9 |
80 |
unless my $entry = $self->_readline |
|
129
|
0 |
80 |
if ($entry =~ /\A\s*\Z/s) |
|
130
|
0 |
0 |
unless $entry = $self->_readline |
|
136
|
4 |
76 |
if $. == 1 and not $entry =~ /^>/ |
|
142
|
75 |
1 |
if defined $sequence |
|
147
|
76 |
0 |
if ($top =~ /^\s*(\S+)\s*(.*)/) |
|
151
|
0 |
76 |
if (defined $id and $id eq '') |
|
153
|
75 |
1 |
if defined $sequence |
|
157
|
2 |
74 |
if (defined $sequence and length $sequence == 0) |
|
158
|
2 |
0 |
unless (defined $alphabet) |
|
208
|
7 |
0 |
if ($block >= $width) { } |
|
217
|
0 |
7 |
unless defined $seq and ref $seq and $seq->isa('Bio::PrimarySeqI') |
|
223
|
0 |
7 |
if ($id_type =~ /^acc/i) { } |
|
|
7 |
0 |
elsif ($id_type =~ /^displ/i) { } |
|
|
0 |
0 |
elsif ($id_type =~ /^pri/i) { } |
|
225
|
0 |
0 |
if ($id_type =~ /vers/i) |
|
229
|
0 |
7 |
if defined $seq->display_id and $seq->display_id =~ /\s/ |
|
232
|
0 |
7 |
unless defined $top |
|
233
|
0 |
7 |
if defined $top and $top =~ /\s/ |
|
239
|
6 |
1 |
if ($seq->can('desc') and my $desc = $seq->desc) |
|
244
|
1 |
6 |
if ($seq->isa('Bio::Seq::LargeSeqI')) { } |
|
255
|
1 |
0 |
if $buff_end > $seq_length |
|
257
|
1 |
0 |
if ($buff) { } |
|
266
|
6 |
0 |
if (defined $str and length $str > 0) { } |
|
271
|
0 |
6 |
unless $self->_print('>', $top, "\n", $str) |
|
275
|
7 |
0 |
if $self->_flush_on_write and defined $self->_fh |
|
291
|
40 |
54 |
if (defined $value) |
|
312
|
40 |
7 |
if (defined $value) |
|
337
|
41 |
7 |
if (defined $type) |
|
338
|
0 |
41 |
unless (grep((lc $type eq $_), @SEQ_ID_TYPES)) |