| blib/lib/Data/Importer/Iterator/Csv.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 10 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 74 | 1 | 0 | $self->has_encoding ? : |
| 75 | 0 | 1 | unless open my $file, "<$attr", $filename |
| 91 | 1 | 62 | unless ($csv->column_names) |
| 94 | 0 | 1 | if @fieldnames < 2 |
| 96 | 0 | 1 | if (my(@missing) = grep({not $fieldnames{$_};} @{$self->mandatory;})) |