line |
true |
false |
branch |
67
|
0 |
2 |
unless ($type) |
72
|
2 |
0 |
if defined $commands and @$commands |
105
|
0 |
0 |
if ($other) |
133
|
0 |
4 |
if ($row =~ /^\s*$/) |
136
|
0 |
4 |
if ($row =~ /^\s*[\"|\']([^\"\']+)[\"|\']\s*([^\[]*)(\[.*\]\s*)*/) { } |
139
|
0 |
0 |
unless ($self->find_taxon($name)) |
149
|
4 |
0 |
if ($self->find_taxon($1)) { } |
155
|
0 |
0 |
if $verbose |
165
|
0 |
6 |
if ($$taxon{'name'} eq $name) |
170
|
4 |
0 |
if ($newtaxon) |
184
|
4 |
0 |
if ($1) { } |
|
0 |
0 |
elsif ($2) { } |
221
|
0 |
7 |
unless $self->get_taxlabels |
|
0 |
7 |
if (@{[] unless $self->get_taxlabels;} == 0) |
223
|
5 |
16 |
if (lc $taxon eq lc $name) |
253
|
0 |
0 |
unless (shift())->{'format'} |
345
|
0 |
1 |
if ($self->find_taxon($copy_otu_name)) { } |
353
|
1 |
0 |
if (defined $$self{'otuset'}{'otus'}) |
357
|
4 |
0 |
if (defined $otu) |
358
|
1 |
3 |
if ($otu->get_name eq $original_otu_name) |
380
|
0 |
0 |
unless (Bio::NEXUS::Block::equals($self, $block)) |
427
|
0 |
0 |
if (scalar keys %formats) |
429
|
0 |
0 |
if (defined $formats{'datatype'}) |
434
|
0 |
0 |
if (not $formats{$format} or $format =~ /datatype/i) { } |
|
0 |
0 |
elsif ($formats{$format} eq '1') { } |
474
|
0 |
1 |
if $Bio::NEXUS::UnalignedBlock::AUTOLOAD =~ /DESTROY$/ |
484
|
0 |
1 |
if (defined $synonym_for{$Bio::NEXUS::UnalignedBlock::AUTOLOAD}) { } |