| line |
true |
false |
branch |
|
26
|
1 |
676 |
if ($orig_global_caller) { } |
|
28
|
0 |
1 |
&$orig_global_caller() eq 'DB' ? : |
|
|
0 |
1 |
unless @caller = &$orig_global_caller() eq 'DB' ? do {
package DB;
&$orig_global_caller($i++)
} : &$orig_global_caller($i++) |
|
34
|
21 |
655 |
caller() eq 'DB' ? : |
|
|
10 |
666 |
unless @caller = caller() eq 'DB' ? do {
package DB;
caller $i++
} : caller $i++ |
|
39
|
10 |
657 |
if $name_cache |
|
40
|
10 |
657 |
grep({$caller[0] eq $_;} @Devel::Caller::IgnoreNamespaces::NAMESPACES) ? : |
|
43
|
555 |
112 |
if $name_cache or $height-- != 0 |
|
44
|
20 |
8 |
@_ ? : |
|
|
28 |
84 |
wantarray ? : |