| line |
true |
false |
branch |
|
14
|
7 |
44 |
if (ref $_[0] eq 'HASH' and _parse_flatten_option(shift())) |
|
24
|
7 |
48 |
if (ref $_[0] eq 'HASH' and _parse_flatten_option(shift())) |
|
33
|
2 |
18 |
if @extra_values |
|
56
|
89 |
16 |
unless (exists $$leading_hash{$keys->[-1]}) |
|
67
|
11 |
7 |
unless (exists $$leading_hash{$keys->[-1]}) |
|
88
|
3 |
120 |
unless (@_) |
|
94
|
9 |
111 |
unless $get_keys_ref eq 'CODE' |
|
97
|
58 |
53 |
if (@_) { } |
|
100
|
9 |
49 |
if $get_value_ref ne 'CODE' |
|
113
|
56 |
44 |
ref $_ ? : |
|
117
|
61 |
30 |
unless %$options |
|
119
|
2 |
28 |
if keys %$options > 1 |
|
123
|
2 |
26 |
if %$options |