line |
true |
false |
branch |
142
|
252 |
898 |
if ($node and not $root) |
143
|
0 |
252 |
unless ref $node and $node->isa('Bio::Tree::NodeI') |
149
|
252 |
0 |
if ($node->isa('Bio::Taxon')) |
150
|
252 |
0 |
unless $node eq $root |
157
|
912 |
238 |
if ($root) |
162
|
0 |
1150 |
if defined $id |
163
|
0 |
1150 |
if defined $score |
182
|
1150 |
952 |
if @_ |
208
|
1776 |
6 |
if ($node) |
209
|
946 |
830 |
if ($order =~ /^b/io) { } |
|
830 |
0 |
elsif ($order =~ /^d/io) { } |
259
|
929 |
0 |
if (@_) |
261
|
0 |
929 |
if (defined $value and not $value->isa('Bio::Tree::NodeI')) |
299
|
0 |
20 |
unless $node |
320
|
68 |
5 |
if (defined $val) |
341
|
33 |
172 |
if (defined $val) |
392
|
0 |
42 |
unless open my $fh, '>', \$string |
422
|
0 |
1 |
unless (defined $tag and scalar @values) |
444
|
0 |
2 |
unless (defined $tag and defined $value) |
464
|
1 |
2 |
if (exists $self->{'_tags'}{$tag}) |
502
|
0 |
0 |
unless $self->{'_tags'} |
519
|
0 |
1 |
unless $self->{'_tags'}{$tag} |
520
|
0 |
1 |
unless $self->{'_tags'}{$tag} |
|
1 |
1 |
wantarray ? : |
564
|
0 |
0 |
if $parent->ancestor |
575
|
950 |
2 |
unless ($self->nodelete) |