| line |
true |
false |
branch |
|
57
|
4 |
45 |
if (ref ${$ref;} eq 'ARRAY') { } |
|
|
43 |
2 |
elsif (ref ${$ref;} eq 'HASH') { } |
|
|
1 |
1 |
elsif (&is_number(${$ref;})) { } |
|
59
|
3 |
10 |
if (ref ${$ref;}->[$_]) { } |
|
|
4 |
6 |
elsif (&readonly(${$ref;}->[$_])) { } |
|
|
3 |
3 |
elsif (&is_number(${$ref;}->[$_])) { } |
|
62
|
2 |
2 |
${$ref;}->[$_] ? : |
|
69
|
28 |
89 |
if (ref ${$ref;}->{$_}) { } |
|
|
4 |
85 |
elsif (&readonly(${$ref;}->{$_})) { } |
|
|
19 |
66 |
elsif (&is_number(${$ref;}->{$_})) { } |
|
72
|
2 |
2 |
delete ${$ref;}->{$_} ? : |
|
96
|
9 |
0 |
if $modern_yaml_xs |
|
98
|
9 |
0 |
if ($modern_yaml_xs) |
|
99
|
9 |
0 |
if ref \1 eq 'JSON::PP::Boolean' |
|
110
|
0 |
0 |
if (ref ${$ref;} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref ${$ref;} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref ${$ref;} eq $bool_type) { } |
|
112
|
0 |
0 |
if (ref ${$ref;}->[$_]) { } |
|
|
0 |
0 |
elsif (ref ${$ref;}->[$_] eq $bool_type) { } |
|
115
|
0 |
0 |
${$ref;}->[$_] ? : |
|
120
|
0 |
0 |
if (ref ${$ref;}->{$_}) { } |
|
|
0 |
0 |
elsif (ref ${$ref;}->{$_} eq $bool_type) { } |
|
123
|
0 |
0 |
${$ref;}->{$_} ? : |
|
127
|
0 |
0 |
${$ref;} ? : |
|
138
|
341 |
19 |
if ($format eq 'JSON') { } |
|
|
18 |
1 |
elsif ($format eq 'YAML') { } |
|
|
1 |
0 |
elsif ($format eq 'RAW') { } |
|
139
|
341 |
0 |
unless $opts |
|
154
|
5 |
355 |
if $@ |
|
162
|
0 |
129 |
if $uri eq '-' |
|
164
|
81 |
48 |
unless defined $fmt |
|
167
|
41 |
88 |
if (ref $uri eq 'GLOB') { } |
|
177
|
0 |
88 |
unless open my $fh, '>', $file |
|
186
|
130 |
12 |
if ($format eq 'JSON' or $format eq 'RAW' and ref $data) { } |
|
|
9 |
3 |
elsif ($format eq 'YAML') { } |
|
|
3 |
0 |
elsif ($format eq 'RAW') { } |
|
187
|
81 |
49 |
unless $opts |
|
204
|
0 |
142 |
if $@ |
|
211
|
413 |
1 |
if (@names and @names > 1) |
|
213
|
1 |
412 |
if $ext eq 'YML' or $ext eq 'YAML' |
|
222
|
0 |
353 |
if $uri eq '-' |
|
224
|
333 |
18 |
unless defined $fmt |
|
233
|
0 |
353 |
if (ref $uri eq 'GLOB') { } |
|
236
|
2 |
351 |
unless open my $fh, '<', $uri |