line |
true |
false |
branch |
37
|
0 |
5 |
if not $no_cache and $SCOPES_CACHE{$package} |
39
|
0 |
5 |
if $no_cache |
78
|
5 |
0 |
if (not defined $TABLES{$class}) { } |
83
|
133 |
0 |
if ($table_i =~ /^([\$\@\%\*\&])(\Q$class\E:*)(.*)/) |
85
|
0 |
133 |
if $name eq '__SAFEWORLD_HOOK__' |
88
|
128 |
5 |
if ($tp eq '&') { } |
|
5 |
0 |
elsif ($only_call) { } |
|
0 |
0 |
elsif ($tp eq '$') { } |
|
0 |
0 |
elsif ($tp eq '@') { } |
|
0 |
0 |
elsif ($tp eq '%') { } |
|
0 |
0 |
elsif ($tp eq '*') { } |
101
|
5 |
0 |
unless (defined &$hook_sub) |
109
|
3 |
2 |
if ($$table{'&'}{'DESTROY'}) |
111
|
0 |
3 |
if $HOOK_IDS{"$_[0]"} |
116
|
5 |
0 |
if ($only_call) |
132
|
5 |
0 |
unless $packname =~ /::$/ |
135
|
0 |
5 |
unless defined $package |
145
|
158 |
1 |
unless ($symb =~ /::$/ or $symb =~ /[^\w:]/) |
146
|
5 |
153 |
if (defined $$fullname) |
147
|
0 |
158 |
if (defined %$fullname) |
148
|
0 |
158 |
if (defined @$fullname) |
149
|
128 |
30 |
if (defined &$fullname) |
150
|
0 |
158 |
if (*{$fullname;}{'IO'} and fileno $fullname) |
169
|
5 |
0 |
if ($_[0] eq 'call') { } |
|
0 |
0 |
elsif ($$__TABLE__{'only_call'} and $$__TABLE__{'only_call'}{"$__HOOK__"}) { } |
|
0 |
0 |
elsif ($_[0] eq 'get') { } |
|
0 |
0 |
elsif ($_[0] eq 'set') { } |
172
|
5 |
0 |
if $sub |
180
|
0 |
0 |
if ($_[0] eq '$') { } |
|
0 |
0 |
elsif ($_[0] eq '@') { } |
|
0 |
0 |
elsif ($_[0] eq '%') { } |
|
0 |
0 |
elsif ($_[0] eq '*') { } |
|
0 |
0 |
elsif ($_[0] eq '\\$') { } |
|
0 |
0 |
elsif ($_[0] eq '\\@') { } |
|
0 |
0 |
elsif ($_[0] eq '\\%') { } |
|
0 |
0 |
elsif ($_[0] eq '\\*') { } |
192
|
0 |
0 |
$__REF__ eq 'HASH' ? : |
|
0 |
0 |
$__REF__ eq 'ARRAY' ? : |
|
0 |
0 |
$__REF__ eq 'SCALAR' ? : |
|
0 |
0 |
if ($_[0] eq '$') { } |
|
0 |
0 |
elsif ($_[0] eq '@') { } |
|
0 |
0 |
elsif ($_[0] eq '%') { } |
|
0 |
0 |
elsif ($_[0] eq '*') { } |
193
|
0 |
0 |
$__REF__ eq 'HASH' ? : |
|
0 |
0 |
$__REF__ eq 'ARRAY' ? : |
|
0 |
0 |
$__REF__ eq 'SCALAR' ? : |
194
|
0 |
0 |
$__REF__ eq 'HASH' ? : |
|
0 |
0 |
$__REF__ eq 'ARRAY' ? : |
|
0 |
0 |
$__REF__ eq 'SCALAR' ? : |
195
|
0 |
0 |
$__REF__ eq 'HASH' ? : |
|
0 |
0 |
$__REF__ eq 'ARRAY' ? : |
|
0 |
0 |
$__REF__ eq 'SCALAR' ? : |
218
|
1 |
2 |
unless $HOLE |
220
|
0 |
3 |
if ($this->_STASH_REF_NOW ne $$this{'STASH'}) |
222
|
0 |
0 |
unless $sub_ref |
234
|
1 |
0 |
if (not $HOLE) |
273
|
0 |
0 |
if ($keep_ref) { } |