| line |
true |
false |
branch |
|
60
|
8 |
68 |
if ($name_routines and not defined &subname) |
|
61
|
8 |
0 |
if (eval {
do {
require Sub::Name;
1
}
}) { } |
|
68
|
41 |
35 |
if ($target eq 'package') { } |
|
|
26 |
9 |
elsif ($target eq 'object') { } |
|
|
9 |
0 |
elsif ($target eq 'hash') { } |
|
74
|
12 |
482 |
unless $type =~ /_sub\z/ |
|
77
|
470 |
12 |
if $name_routines |
|
86
|
12 |
312 |
unless $type =~ /_method\z/ |
|
88
|
300 |
12 |
if $name_routines |
|
93
|
54 |
54 |
unless $type =~ /_sub\z/ |
|
101
|
12 |
2 |
unless defined $replace |
|
103
|
12 |
2 |
if ($target_type eq 'package') { } |
|
|
1 |
1 |
elsif ($target_type eq 'object') { } |
|
|
1 |
0 |
elsif ($target_type eq 'hash') { } |
|
104
|
0 |
2 |
if $Package_Targets{$target_name} |
|
|
2 |
10 |
unless ($replace) |
|
108
|
0 |
0 |
if $Object_Targets{$addr} |
|
|
0 |
1 |
unless ($replace) |
|
112
|
0 |
0 |
if $Hash_Targets{$addr} |
|
|
0 |
1 |
unless ($replace) |
|
123
|
3 |
3 |
$Levels{$_} > $Current_Level ? : |
|
|
3 |
3 |
$Levels{$_} > $Current_Level ? : |
|
133
|
1 |
0 |
unless defined $per_target_conf{'category'} |
|
137
|
0 |
1 |
if (keys %Global_Hooks) { } |
|
153
|
10 |
0 |
unless defined $per_target_conf{'category'} |
|
155
|
9 |
1 |
if (keys %Global_Hooks) { } |