Branch Coverage

Bio/AlignIO/arp.pm
Criterion Covered Total %
branch 27 36 75.0


line true false branch
122 14 195 if $data =~ /^\s*$/msx
123 9 186 if ($data =~ /\[{1,2}(\w+)\]{1,2}/msx) { }
32 154 elsif ($data =~ /^\s*(\w+)=\s?(\S[^\n]*$)/msx) { }
5 149 elsif ($data =~ /^\s*\}\s*$/msx) { }
129 5 27 if ($cur_data =~ /^\s*\{\s*$/)
131 0 5 unless exists $self->{'state'}{'current_block'}
141 10 17 $self->{'state'}{'current_block'} eq 'Samples' ? :
145 0 5 unless exists $self->{'state'}{'in_curly_block'}
146 5 0 if ($self->{'state'}{'current_block'} eq 'Samples') { }
159 0 0 unless exists $self->{'state'}{'current_block'} or $self->{'state'}{'in_curly_block'}
162 12 137 if $data =~ /^\s*\#/msx
163 137 0 if ($self->{'state'}{'current_block'} eq 'Samples') { }
183 5 0 if $aln->num_sequences
208 0 137 unless defined $raw
224 5 37 if ($key eq 'Title') { }
5 32 elsif ($key eq 'Samples') { }
5 27 elsif ($key eq 'SampleName') { }
235 0 27 unless ref $self->{'state'}{$anntype}{$key} eq 'ARRAY'