Branch Coverage

Bio/AlignIO/po.pm
Criterion Covered Total %
branch 39 50 78.0


line true false branch
102 3 0 if ($entry =~ /^VERSION=(\S+)/)
105 3 0 if (defined($entry = $self->_readline) and $entry =~ /^NAME=(\S+)/)
118 0 2682 if ($entry =~ /^VERSION/) { }
18 2664 elsif ($entry =~ /^SOURCENAME=(\S+)/) { }
18 2646 elsif ($entry =~ /^SOURCEINFO=(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(.*)/) { }
2637 9 elsif ($entry =~ /^(\S):(\S+)/) { }
126 0 18 if ($name =~ m[(\S+)/(\d+)-(\d+)]) { }
161 2637 0 if ($list =~ /^([L\d]*)([S\d]*)([A\d]*)/)
166 2625 12 if @{$node->{'L'};} > 0
167 2637 0 if @{$node->{'S'};} > 0
168 2313 324 if @{$node->{'A'};} > 0
177 1371 1266 if $node->{'status'} ne 'unvisited'
190 942 1371 if $node->{'status'} ne 'unvisited'
214 3 0 if $aln->num_sequences
243 0 2 unless ($aln and $aln->isa('Bio::Align::AlignI'))
275 2200 2864 if $char eq $aln->gap_char
277 1758 1106 unless (defined($node = $ring->{'nodes'}{$char}))
298 12 2852 unless defined $seq->{'first'}
304 2852 12 if defined $seq->{'previous'}
309 628 216 if ($ring->{'first'} < $ring->{'last'})
323 2 0 $aln->source && !($aln->source =~ /\A\s*\Z/) ? :
342 1750 8 if keys %{$$node{'L'};} > 0
343 1758 0 if @{$node->{'S'};} > 0
344 1542 216 if @{$node->{'A'};} > 0
348 2 0 if $self->_flush_on_write and defined $self->_fh