blib/lib/Text/CSV.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 8 | 12 | 66.6 |
line | true | false | branch |
---|---|---|---|
59 | 1 | 626 | unless ($proto) |
67 | 575 | 50 | if (my $obj = $Text::CSV::Worker->new(@_)) { } |
86 | 0 | 2 | ref $proto->{'_MODULE'} ? : |
0 | 2 | !ref($proto) ? : | |
112 | 0 | 31 | if $Text::CSV::DEBUG |
116 | 0 | 31 | if $@ |