blib/lib/Data/Roundtrip.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 46 | 70 | 65.7 |
line | l | !l | condition |
---|---|---|---|
155 | 0 | 2 | warn "perl2yaml() : pretty-printing is not supported for YAML output" and $pretty_printing = 0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
122 | 22 | 0 | 3 | exists $params->{'pretty'} && defined $params->{'pretty'} |
125 | 10 | 0 | 15 | exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} |
153 | 20 | 0 | 3 | exists $params->{'pretty'} && defined $params->{'pretty'} |
159 | 11 | 0 | 12 | exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} |
374 | 7 | 0 | 27 | exists $params->{'terse'} && defined $params->{'terse'} |
377 | 16 | 0 | 18 | exists $params->{'indent'} && defined $params->{'indent'} |
380 | 2 | 29 | 3 | $_permanent_override == 0 and exists $params->{'dont-bloody-escape-unicode'} && defined $params->{'dont-bloody-escape-unicode'} && $params->{'dont-bloody-escape-unicode'} == 1 || exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} && $params->{'escape-unicode'} == 0 |
414 | 6 | 5 | 3 | $_permanent_filter == 0 and exists $params->{'dont-bloody-escape-unicode'} && defined $params->{'dont-bloody-escape-unicode'} && $params->{'dont-bloody-escape-unicode'} == 1 || exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} && $params->{'escape-unicode'} == 0 |
435 | 2 | 0 | 3 | exists $params->{'dont-bloody-escape-unicode'} and defined $params->{'dont-bloody-escape-unicode'} |
2 | 1 | 2 | exists $params->{'dont-bloody-escape-unicode'} and defined $params->{'dont-bloody-escape-unicode'} and $params->{'dont-bloody-escape-unicode'} == 1 | |
2 | 0 | 1 | exists $params->{'escape-unicode'} and defined $params->{'escape-unicode'} | |
2 | 0 | 1 | exists $params->{'escape-unicode'} and defined $params->{'escape-unicode'} and $params->{'escape-unicode'} == 0 |
line | l | !l | condition |
---|---|---|---|
587 | 2 | 0 | shift() || '' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
172 | 0 | 0 | 7 | $@ or not defined $yaml_string |
185 | 0 | 0 | 16 | $@ or not defined $yaml_string |
196 | 0 | 0 | 23 | $@ or not defined $pv |
215 | 0 | 0 | 17 | $@ or not defined $pv |
219 | 0 | 0 | 10 | $@ or not defined $pv |
340 | 0 | 0 | 35 | $@ or not defined $pv |
380 | 17 | 2 | 13 | exists $params->{'dont-bloody-escape-unicode'} && defined $params->{'dont-bloody-escape-unicode'} && $params->{'dont-bloody-escape-unicode'} == 1 || exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} && $params->{'escape-unicode'} == 0 |
414 | 3 | 2 | 3 | exists $params->{'dont-bloody-escape-unicode'} && defined $params->{'dont-bloody-escape-unicode'} && $params->{'dont-bloody-escape-unicode'} == 1 || exists $params->{'escape-unicode'} && defined $params->{'escape-unicode'} && $params->{'escape-unicode'} == 0 |
435 | 0 | 2 | 3 | $_permanent_override == 1 or exists $params->{'dont-bloody-escape-unicode'} and defined $params->{'dont-bloody-escape-unicode'} and $params->{'dont-bloody-escape-unicode'} == 1 |
2 | 2 | 1 | $_permanent_override == 1 or exists $params->{'dont-bloody-escape-unicode'} and defined $params->{'dont-bloody-escape-unicode'} and $params->{'dont-bloody-escape-unicode'} == 1 or exists $params->{'escape-unicode'} and defined $params->{'escape-unicode'} and $params->{'escape-unicode'} == 0 |