line |
true |
false |
branch |
142
|
254 |
857 |
if ($node and not $root) |
143
|
0 |
254 |
unless ref $node and $node->isa('Bio::Tree::NodeI') |
149
|
254 |
0 |
if ($node->isa('Bio::Taxon')) |
150
|
254 |
0 |
unless $node eq $root |
157
|
873 |
238 |
if ($root) |
162
|
0 |
1111 |
if defined $id |
163
|
0 |
1111 |
if defined $score |
182
|
1111 |
913 |
if @_ |
208
|
1231 |
6 |
if ($node) |
209
|
907 |
324 |
if ($order =~ /^b/io) { } |
|
324 |
0 |
elsif ($order =~ /^d/io) { } |
259
|
890 |
0 |
if (@_) |
261
|
0 |
890 |
if (defined $value and not $value->isa('Bio::Tree::NodeI')) |
299
|
0 |
15 |
unless $node |
320
|
42 |
5 |
if (defined $val) |
341
|
7 |
127 |
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
|
911 |
2 |
unless ($self->nodelete) |