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' |