inc/Sub/Uplevel.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 2 | 18 | 11.1 |
line | true | false | branch |
---|---|---|---|
98 | 0 | 0 | if *CORE::GLOBAL::caller{'CODE'} != \&_uplevel_caller |
111 | 0 | 1 | if (caller() eq 'DB') { } |
114 | 0 | 0 | if (wantarray and not @_) { } |
122 | 1 | 0 | if (wantarray and not @_) { } |
137 | 0 | 0 | unless @Sub::Uplevel::Up_Frames |
201 | 0 | 0 | if (defined $caller[0] and $caller[0] eq 'Sub::Uplevel') |
212 | 0 | 0 | if (caller() eq 'DB') { } |
221 | 0 | 0 | if (wantarray) { } |
222 | 0 | 0 | unless (@_) |