blib/lib/Text/CSV/Easy_PP.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 20 | 50.0 |
line | true | false | branch |
---|---|---|---|
62 | 0 | 2 | if (not defined $_) { } |
0 | 2 | elsif (/^\d+$/) { } | |
85 | 0 | 1 | unless $str |
104 | 0 | 2 | if (defined $field and $field =~ /^0+$/) { } |
112 | 0 | 0 | $match =~ /^,?""(?:\r?\n)?$/ ? : |
117 | 1 | 1 | $last_pos != 0 ? : |
0 | 2 | if pos $str > $last_pos + length($match) + ($last_pos != 0 ? 1 : 0) | |
122 | 2 | 0 | if ($field) |
123 | 0 | 2 | if $field =~ /(? |
132 | 0 | 1 | if $last_pos != length $str |