Branch Coverage

Bio/AlignIO/fasta.pm
Criterion Covered Total %
branch 21 30 70.0


line true false branch
92 86 454 if ($entry =~ s/^>\s*(\S+)\s*//)
96 76 10 if (defined $name)
126 0 10 unless defined $name
127 0 10 unless defined $seqchar
131 5 5 if ($name =~ m[(\S+/(\d+)-(\d+))$]) { }
144 10 0 unless (length $seqchar == 0 and length $seqname == 0)
158 39 47 if ($seq->length < $alnlen)
165 10 0 if $aln->num_sequences
188 0 2 unless ($aln and $aln->isa('Bio::Align::AlignI'))
192 0 2 if ($self->force_displayname_flat)
199 3 14 if $desc
200 0 17 unless $self->_print(">$name$desc\n")
203 17 0 if (defined $seq and $length > 0) { }
211 2 0 if $self->_flush_on_write and defined $self->_fh
247 10 2 if @_