| blib/lib/Text/CSV.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 73 | 1 | 644 | unless ($proto) |
| 81 | 593 | 50 | if (my $obj = $Text::CSV::Worker->new(@_)) { } |
| 94 | 11 | 273 | if (@_ and ref $_[0] eq "Text::CSV" or ref $_[0] eq "Text::CSV"->backend) |
| 108 | 0 | 2 | ref $proto->{'_MODULE'} ? : |
| 559 | 2 | !ref($proto) ? : | |
| 134 | 0 | 33 | if $Text::CSV::DEBUG |
| 138 | 0 | 33 | if $@ |