| line |
true |
false |
branch |
|
33
|
0 |
3 |
if $Debug |
|
60
|
2 |
1 |
ref $delegates[0] ? : |
|
63
|
0 |
3 |
unless ref $object and $object =~ /=/ |
|
69
|
1 |
2 |
if $object->can('set_owner') |
|
90
|
0 |
1 |
unless defined $delegate |
|
109
|
3 |
0 |
if (defined $$self{'__delegates'}{$name}) { } |
|
126
|
0 |
3 |
unless ref $self |
|
127
|
0 |
3 |
unless $self =~ /=HASH\(/ |
|
129
|
1 |
2 |
unless defined $$self{'__delegates'} |
|
130
|
1 |
2 |
unless defined $$self{'__delegation_cache'} |
|
149
|
2 |
1 |
unless (defined $$self{'__delegation_cache'}{$method}) |
|
157
|
2 |
4 |
if (@{$public;}) { } |
|
159
|
0 |
2 |
if ($public_method eq $method) |
|
166
|
3 |
1 |
if $delegate->can($method) |
|
170
|
0 |
2 |
if (@targets == 0) { } |
|
|
1 |
1 |
elsif (@targets == 1) { } |