Branch Coverage

Bio/SeqIO/metafasta.pm
Criterion Covered Total %
branch 17 38 44.7


line true false branch
111 0 3 if $width
112 3 0 unless (defined $self->sequence_factory)
132 0 2 unless my $entry = $self->_readline
135 0 2 if ($entry =~ /\A\s*\Z/s)
136 0 0 unless $entry = $self->_readline
142 2 0 if defined $sequence
148 2 0 if ($top =~ /^\s*(\S+)\s*(.*)/)
152 0 2 if (defined $id and $id eq '')
154 2 0 if defined $sequence
158 0 2 if (defined $sequence and length $sequence == 0) { }
159 0 0 unless (defined $alphabet)
190 2 0 unless (defined $alphabet)
210 0 1 unless defined $seq and ref $seq and $seq->isa('Bio::PrimarySeqI')
215 0 1 if ($seq->can('desc') and my $desc = $seq->desc)
219 1 0 if (length $str > 0) { }
224 0 1 unless $self->_print('>', $top, "\n", $str)
225 1 0 if ($seq->isa('Bio::Seq::MetaI'))
234 1 0 if $self->_flush_on_write and defined $self->_fh
251 0 1 if (defined $value)