| blib/lib/Text/CSV.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 14 | 78.5 |
| line | true | false | branch |
|---|---|---|---|
| 72 | 1 | 701 | unless ($proto) |
| 80 | 650 | 50 | if (my $obj = $Text::CSV::Worker->new(@_)) { } |
| 92 | 15 | 330 | if (@_ and ref $_[0] eq __PACKAGE__ or ref $_[0] eq __PACKAGE__->backend) |
| 105 | 0 | 2 | ref $proto->{'_MODULE'} ? : |
| 677 | 2 | !ref($proto) ? : | |
| 128 | 0 | 38 | if $Text::CSV::DEBUG |
| 132 | 0 | 38 | if $@ |