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
176 635 0 415 exists $self->{$lower_case_token} and not $private_block
1 0 634 $self->{'_current'} and not $private_block
199 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
208 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 ';'
333 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
396 0 822 8 $i and not $INSIDE_QUOTE
425 6 405 3 $i and not $INSIDE_QUOTE
485 0 0 13 $block->_type != $TAXA and $block->can('set_taxa')
489 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
555 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
580 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|=)/
604 0 0 0 defined $token and uc $token eq 'NO'
612 0 14 11 defined $token and uc $token ne 'TITLE'
624 0 2 0 defined $token and not $token =~ /^(?:LINK|TAXA|=)$/i
628 0 0 0 $block->get_name and $block->get_name eq $link
646 0 26 13 defined $_[0] and $_[0] =~ /^\d+$/
655 0 13 59 defined $_[0] and uc $_[0] ne 'TAXLABELS'
0 0 13 defined $_[0] and uc $_[0] eq 'TAXLABELS'
670 0 0 0 defined $_[0] and uc $_[0] ne 'BLOCKID'
697 0 18 9 defined $_[0] and $_[0] =~ /^\d+$/
711 0 18 9 defined $_[0] and not $_[0] =~ /^(?:DATATYPE|=)/i
720 0 0 0 defined $_[0] and not $_[0] =~ /^(?:MATCHCHAR|=)/i
756 10 0 5 not $_[0] =~ /^(?:SYMBOLS|=)$/i and $_[0] =~ /^"?(.+)"?$/
767 0 0 0 defined $_[0] and uc $_[0] ne 'CHARLABELS'
776 0 2 16 defined $token and uc $token ne 'CHARSTATELABELS'
784 0 0 0 defined $token and uc $token ne 'STATELABELS'
836 0 0 42 defined $rowname and not $token =~ /$COMMENT/
973 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
1012 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;}
1059 8 0 0 defined $self->{'_ntax'} and $self->_current->get_ntax != $self->{'_ntax'}
1103 115 51 5 $i and $i == 1
1107 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 ';'
1127 199 0 13 $_[0] eq '=' and not $self->{'_treestart'}
1130 13 26 173 $_[0] ne '=' and $self->{'_treestart'}
1136 26 13 173 $self->{'_treestart'} and $self->{'_tree'}
13 160 13 $self->{'_treestart'} and $self->{'_tree'} and $self->{'_tree'} =~ tr/(// == $self->{'_tree'} =~ tr/)//
1165 8 20 5 uc $self->{'_previous'} eq ';' and $self->{'_trees'}
1222 2 0 2 $range->[0] and $range->[0] eq '-'
1287 1 1 4 @labels and $labels[0] ne ','
1311 2 2 2 $range->[0] and $range->[0] eq '-'

or 3 conditions

line l !l&&r !l&&!r condition
333 52 24 332 $line =~ /$QUOTES_OR_BRACKETS/mx || $INSIDE_QUOTE
377 5 4 11 $q eq '"' or $q eq q[']
417 0 0 6 $q eq '"' or $q eq q[']
555 2 13 2 $token =~ /CHARSET/i || $self->{'_charset'}{'name'}
580 2 15 2 $token =~ /TAXSET/i || $self->{'_taxset'}{'name'}
734 18 0 9 $_[0] =~ /^(?:GAP|=)/i || $self->{'_gap'}
745 18 0 9 $_[0] =~ /^(?:MISSING|=)/i || $self->{'_missing'}
836 42 0 39 defined $rowname || $token =~ /$COMMENT/
973 0 0 228 $in_set || exists $brackets{$c}
1124 186 13 13 $self->{'_treename'} or $_[0] =~ /^(U?TREE|\*)$/i