| line |
true |
false |
branch |
|
28
|
2 |
0 |
if ($tag eq 'uplevel') { } |
|
|
0 |
0 |
elsif ($tag eq ':aggressive') { } |
|
48
|
0 |
0 |
if delete $INC{$m} |
|
60
|
0 |
0 |
unless defined scalar &$Caller_Proxy($height) |
|
72
|
1 |
0 |
if *CORE::GLOBAL::caller{'CODE'} != \&_uplevel_caller |
|
94
|
0 |
7 |
if (caller() eq 'DB') |
|
100
|
0 |
7 |
unless @caller |
|
101
|
3 |
4 |
unless wantarray |
|
102
|
1 |
3 |
@_ ? : |
|
111
|
0 |
8 |
unless @Up_Frames |
|
126
|
0 |
28 |
if (defined $caller[0] and $caller[0] eq 'Sub::Uplevel') |
|
137
|
1 |
7 |
if (caller() eq 'DB') |
|
143
|
0 |
8 |
unless @caller |
|
144
|
6 |
2 |
unless wantarray |
|
145
|
1 |
1 |
@_ ? : |