| line |
true |
false |
branch |
|
46
|
1390 |
638 |
if (my($k, $v) = &{$sub;}($scratchpad)) |
|
53
|
48 |
42524 |
if (wantarray) { } |
|
63
|
42476 |
48 |
if (@src) |
|
67
|
41086 |
1390 |
if (my(@kv) = &{$sub;}($$src[4])) { } |
|
68
|
0 |
41086 |
unless @kv == 2 |
|
83
|
0 |
16 |
(caller 0)[8] & $locale_hints ? : |
|
89
|
16 |
16 |
(caller 0)[8] & $int_hints ? : |
|
102
|
0 |
4 |
if (UNIVERSAL::isa($file, 'GLOB')) { } |
|
106
|
0 |
4 |
unless open $fh, '<', $file |
|
112
|
4 |
0 |
if (defined(my $k = &{$sub;})) |
|
124
|
1 |
61 |
if (wantarray) { } |
|
132
|
60 |
1 |
if (@src) |
|
139
|
56 |
0 |
if (defined($$src[0] = &{$sub;})) |
|
154
|
0 |
0 |
(caller 0)[8] & $locale_hints ? : |
|
160
|
0 |
2 |
(caller 0)[8] & $int_hints ? : |