| blib/lib/Sub/Caller.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 9 | 15 | 60.0 |
| line | l | !l | condition |
|---|---|---|---|
| 44 | 0 | 0 | $call-- and goto WR_GET_CALLER_FUNC |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 39 | 1 | 1 | 2 | $$CALL{'function'} and $$CALL{'function'} =~ /ANON/ |
| 2 | 0 | 2 | $$CALL{'function'} and $$CALL{'function'} =~ /ANON/ and $call < $frames | |
| 63 | 0 | 0 | 0 | defined &{$pkg . "::$f";} and checkFunc(\&{$pkg . "::$f";}) eq $pkg |
| line | l | !l | condition |
|---|---|---|---|
| 48 | 1 | 1 | $1 || 'main' |
| 49 | 1 | 1 | $$CALL{'function'} ||= 'main' |