| blib/lib/Data/Tubes/Plugin/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 34 | 50 | 68.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 194 | 32 | 4 | 5 | $dquote and $first eq "\"" |
| 10 | 15 | 11 | $squote and $first eq "'" | |
| 195 | 0 | 0 | 5 | $len > 1 and substr($value, -1, 1) eq "\"" |
| 203 | 0 | 0 | 11 | $len > 1 and substr($value, -1, 1) eq "'" |
| 500 | 0 | 0 | 2 | defined $key && length $key |
| line | l | !l | condition |
|---|---|---|---|
| 46 | 7 | 17 | $args{'value'} //= ["whatever"] |
| 108 | 15 | 10 | $value //= "whatever" |
| 186 | 0 | 0 | $decode ||= sub { |
| 215 | 0 | 11 | $decode ||= sub { |
| 318 | 1 | 12 | $args{'allow_missing'} || 0 |
| 374 | 0 | 9 | $args{'allow_missing'} || 0 |
| 375 | 0 | 9 | $args{'allow_surplus'} || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 48 | 2 | 5 | 17 | ref $value ne 'ARRAY' || scalar @$value > 1 || $value->[0] ne 'whatever' |
| 53 | 7 | 4 | 13 | $multiple or not test_all_equal(@$separators) |
| 111 | 16 | 0 | 9 | not $ref or $ref eq "Regexp" |
| 178 | 7 | 3 | 15 | $escape or $squote |
| 10 | 1 | 14 | $escape or $squote or $dquote | |
| 235 | 0 | 0 | 12 | $delta < 0 or $delta > 1 |
| 422 | 0 | 0 | 6 | $n_values + $allow_missing < $n_keys or $n_values - $allow_surplus > $n_keys |