Condition Coverage

blib/lib/Bio/Phylo/Parsers/Nexus.pm
Criterion Covered Total %
condition 114 195 58.4


and 3 conditions

line !l l&&!r l&&r condition
175 635 0 415 exists $self->{$lower_case_token} and not $private_block
1 0 634 $self->{'_current'} and not $private_block
198 1 0 0 $self->{'_begin'} and not exists $self->{$lower_case_token}
1 0 0 $self->{'_begin'} and not exists $self->{$lower_case_token} and not $private_block
207 1 0 0 $private_block and $token_queue->[-2] eq 'end'
1 0 0 $private_block and $token_queue->[-2] eq 'end' and $token_queue->[-1] eq ';'
332 27 29 20 $line =~ /$OPENING_QUOTE_OR_BRACKET/mx and not $INSIDE_QUOTE
26 0 30 not $line =~ /$CONTEXT_CLOSER/ and $INSIDE_QUOTE
6 0 20 $line =~ /$CONTEXT_QB_AT_START/ and $INSIDE_QUOTE
0 0 6 $line =~ /$CONTEXT_CLOSER/ and $INSIDE_QUOTE
395 0 822 8 $i and not $INSIDE_QUOTE
424 6 405 3 $i and not $INSIDE_QUOTE
484 0 0 13 $block->_type != $TAXA and $block->can('set_taxa')
488 0 13 0 $taxa->[-1] and $taxa->[-1]->can('_type') == $TAXA
13 0 0 $taxa->[-1] and $taxa->[-1]->can('_type') == $TAXA and not $block->get_taxa
554 7 5 2 defined $self->{'_charset'}{'matrix'} and not $self->{'_charset'}{'matrix'}
12 1 1 defined $self->{'_charset'}{'matrix'} and not $self->{'_charset'}{'matrix'} and not $token =~ /(?:\(?CHARACTERS|=)/i
579 8 6 2 defined $self->{'_taxset'}{'taxa'} and not $self->{'_taxset'}{'taxa'}
14 1 1 defined $self->{'_taxset'}{'taxa'} and not $self->{'_taxset'}{'taxa'} and not $token =~ /(?:\(?TAXA|=)/
603 0 0 0 defined $token and uc $token eq 'NO'
611 0 14 11 defined $token and uc $token ne 'TITLE'
623 0 2 0 defined $token and not $token =~ /^(?:LINK|TAXA|=)$/i
627 0 0 0 $block->get_name and $block->get_name eq $link
645 0 26 13 defined $_[0] and $_[0] =~ /^\d+$/
654 0 13 59 defined $_[0] and uc $_[0] ne 'TAXLABELS'
0 0 13 defined $_[0] and uc $_[0] eq 'TAXLABELS'
669 0 0 0 defined $_[0] and uc $_[0] ne 'BLOCKID'
696 0 18 9 defined $_[0] and $_[0] =~ /^\d+$/
710 0 18 9 defined $_[0] and not $_[0] =~ /^(?:DATATYPE|=)/i
719 0 0 0 defined $_[0] and not $_[0] =~ /^(?:MATCHCHAR|=)/i
755 10 0 5 not $_[0] =~ /^(?:SYMBOLS|=)$/i and $_[0] =~ /^"?(.+)"?$/
766 0 0 0 defined $_[0] and uc $_[0] ne 'CHARLABELS'
775 0 2 16 defined $token and uc $token ne 'CHARSTATELABELS'
783 0 0 0 defined $token and uc $token ne 'STATELABELS'
835 0 0 42 defined $rowname and not $token =~ /$COMMENT/
972 0 0 0 not $in_set and exists $brackets{$c}
0 0 0 $in_set and $c ne $close
0 0 0 $in_set and $c eq $close
1011 48 0 9 not &looks_like_instance($token, 'ARRAY') and uc $token eq 'MATRIX'
0 9 39 &looks_like_instance($token, 'ARRAY') and not grep({/^;$/;} @{$token;})
0 0 9 &looks_like_instance($token, 'ARRAY') and grep {/^;$/;} @{$token;}
1058 8 0 0 defined $self->{'_ntax'} and $self->_current->get_ntax != $self->{'_ntax'}
1102 115 51 5 $i and $i == 1
1106 57 57 57 not defined $i and $_[0] =~ /^\d+$/
57 0 57 defined $i and exists $self->{'_translate'}[$i]
0 0 57 defined $i and exists $self->{'_translate'}[$i] and not defined $self->{'_translate'}[$i]
0 0 57 defined $i and exists $self->{'_translate'}[$i] and not defined $self->{'_translate'}[$i] and $_[0] ne ';'
1126 199 0 13 $_[0] eq '=' and not $self->{'_treestart'}
1129 13 26 173 $_[0] ne '=' and $self->{'_treestart'}
1135 26 13 173 $self->{'_treestart'} and $self->{'_tree'}
13 160 13 $self->{'_treestart'} and $self->{'_tree'} and $self->{'_tree'} =~ tr/(// == $self->{'_tree'} =~ tr/)//
1164 8 20 5 uc $self->{'_previous'} eq ';' and $self->{'_trees'}
1221 2 0 2 $range->[0] and $range->[0] eq '-'
1286 1 1 4 @labels and $labels[0] ne ','
1310 2 2 2 $range->[0] and $range->[0] eq '-'

or 3 conditions

line l !l&&r !l&&!r condition
332 52 24 332 $line =~ /$QUOTES_OR_BRACKETS/mx || $INSIDE_QUOTE
376 5 4 11 $q eq '"' or $q eq q[']
416 0 0 6 $q eq '"' or $q eq q[']
554 2 13 2 $token =~ /CHARSET/i || $self->{'_charset'}{'name'}
579 2 15 2 $token =~ /TAXSET/i || $self->{'_taxset'}{'name'}
733 18 0 9 $_[0] =~ /^(?:GAP|=)/i || $self->{'_gap'}
744 18 0 9 $_[0] =~ /^(?:MISSING|=)/i || $self->{'_missing'}
835 42 0 39 defined $rowname || $token =~ /$COMMENT/
972 0 0 228 $in_set || exists $brackets{$c}
1123 186 13 13 $self->{'_treename'} or $_[0] =~ /^(U?TREE|\*)$/i