| line |
true |
false |
branch |
|
20
|
96 |
306 |
caller() eq 'DB' ? : |
|
23
|
12 |
390 |
unless @caller |
|
24
|
58 |
332 |
if $name_cache |
|
25
|
58 |
332 |
$caller[0] eq 'Hook::LexWrap' ? : |
|
26
|
316 |
74 |
if $name_cache or $height-- != 0 |
|
27
|
36 |
10 |
@_ ? : |
|
|
46 |
28 |
wantarray ? : |
|
36
|
4 |
24 |
ref $typeglob || $typeglob =~ /::/ ? : |
|
47
|
37 |
17 |
if $wrapper{$_} |
|
52
|
24 |
28 |
if ($unwrap) |
|
54
|
11 |
17 |
if (wantarray) { } |
|
|
4 |
13 |
elsif (defined wantarray) { } |
|
56
|
6 |
5 |
if $wrapper{'pre'} |
|
57
|
7 |
3 |
if (ref $return eq 'ARRAY' and $return == $prereturn and not @$return) |
|
60
|
6 |
1 |
if $wrapper{'post'} |
|
62
|
9 |
2 |
ref $return eq 'ARRAY' ? : |
|
66
|
3 |
1 |
if $wrapper{'pre'} |
|
67
|
3 |
1 |
unless ($prereturn) |
|
70
|
3 |
0 |
if $wrapper{'post'} |
|
76
|
12 |
1 |
if $wrapper{'pre'} |
|
77
|
13 |
0 |
unless ($prereturn) |
|
80
|
11 |
2 |
if $wrapper{'post'} |
|
85
|
1 |
1 |
defined wantarray ? : |
|
|
2 |
23 |
if ref $typeglob eq 'CODE' |
|
92
|
13 |
10 |
unless defined wantarray |