| line |
true |
false |
branch |
|
29
|
10 |
1 |
if ($tag eq 'uplevel') { } |
|
|
1 |
0 |
elsif ($tag eq ':aggressive') { } |
|
49
|
2 |
0 |
if delete $INC{$m} |
|
132
|
2 |
4 |
unless defined scalar &$Caller_Proxy($height) |
|
145
|
30 |
92 |
if *CORE::GLOBAL::caller{'CODE'} != \&Sub::Uplevel::_uplevel_caller |
|
166
|
12 |
722 |
if (caller() eq 'DB') |
|
172
|
123 |
609 |
unless @caller |
|
173
|
16 |
593 |
unless wantarray |
|
174
|
582 |
11 |
@_ ? : |
|
183
|
8 |
684 |
unless @Up_Frames |
|
247
|
1220 |
4738 |
if ($test_caller and $test_caller eq 'Sub::Uplevel') |
|
258
|
10 |
674 |
if (caller() eq 'DB') |
|
264
|
114 |
570 |
unless @caller |
|
265
|
542 |
28 |
unless wantarray |
|
266
|
23 |
5 |
@_ ? : |