| line |
true |
false |
branch |
|
17
|
5 |
4 |
unless @_ |
|
20
|
0 |
4 |
if (@_ > 1) |
|
29
|
1 |
3 |
if (blessed $opt and $opt->isa('IRC::Server::Tree')) |
|
35
|
3 |
0 |
if (ref $opt eq 'ARRAY') |
|
44
|
5 |
4 |
unless $self |
|
51
|
2 |
16 |
if blessed $arrayref |
|
69
|
0 |
13 |
if ($parent_name eq $self) |
|
73
|
0 |
13 |
unless my $index_route = $self->trace_indexes($parent_name) |
|
91
|
13 |
0 |
unless exists $$parent_hash{$name} |
|
104
|
2 |
0 |
unless defined $parent_ref |
|
126
|
3 |
0 |
unless defined $parent_ref |
|
128
|
0 |
3 |
unless my $index_route = $self->trace_indexes($server_name, $parent_ref) |
|
147
|
0 |
4 |
unless my $index_route = $self->trace_indexes($name, $parent_ref) |
|
175
|
0 |
48 |
if (not $ref_or_name) { } |
|
|
47 |
1 |
elsif (ref $ref_or_name) { } |
|
183
|
0 |
48 |
unless $ref |
|
191
|
0 |
36 |
unless $self->names_beneath($node_ref) |
|
203
|
3 |
1 |
unless defined $parent_ref |
|
205
|
0 |
4 |
unless my $index_route = $self->trace_indexes($server_name, $parent_ref) |
|
267
|
0 |
74 |
if $parent_name eq $server_name |
|
274
|
101 |
0 |
unless ($route{$child_name}) |
|
275
|
50 |
51 |
unless $route{$parent_name} |
|
278
|
30 |
71 |
if $child_name eq $server_name |
|
295
|
1 |
0 |
unless defined $parent_ref |
|
304
|
3 |
4 |
if ($indent == 1 or scalar @nodes) { } |
|
320
|
0 |
1 |
unless @list |