line |
true |
false |
branch |
29
|
3 |
11 |
unless blessed $obj |
35
|
1 |
10 |
unless keys %{$methods;} |
40
|
0 |
10 |
if $@ |
50
|
23 |
3 |
if (exists ${$$self{'config'};}{'on_method_call'}) |
57
|
1 |
7 |
if (exists ${$$self{'config'};}{'on_wrap'}) |
67
|
1 |
17 |
if exists ${$cache;}{$obj_class} |
75
|
35 |
2 |
unless exists ${$methods;}{$_} |
86
|
9 |
1 |
unless ($obj_class->can('(""')) |
104
|
0 |
22 |
if defined &{"${proxy_package}::$method_name";} |
105
|
1 |
21 |
if $method_name eq '()' |
106
|
1 |
20 |
if ($method_name eq 'AUTOLOAD') { } |
|
1 |
19 |
elsif ($method_name eq 'DESTROY') { } |
113
|
1 |
1 |
if ($a =~ /DESTROY/) { } |