Branch Coverage

Bio/AlignIO/mega.pm
Criterion Covered Total %
branch 20 26 76.9


line true false branch
125 0 2 unless $entry =~ /^#mega/i
130 2 22 if (/\!Title:\s*([^\;]+)\s*/i) { }
2 20 elsif (s/\!Format\s+([^\;]+)\s*/$1/) { }
2 18 elsif (/^\#/) { }
135 2 4 if ($name eq 'datatype') { }
2 2 elsif ($name eq 'identical') { }
2 0 elsif ($name eq 'indel') { }
149 36 6 unless ($entry =~ /^\s+$/)
155 12 24 unless (defined $seqs{$seqname})
174 2 0 if $aln->num_sequences
195 0 1 if (not $aln && $aln->isa('Bio::Align::AlignI')) { }
0 1 elsif (not $aln->is_flush($self->verbose)) { }
232 1 0 if $self->_flush_on_write and defined $self->_fh