| blib/lib/Iterator/Simple/Util/CSV.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 1 | 4 | @_ == 1 ? : |
| 30 | 0 | 5 | if (ref $input) { } |
| 0 | 5 | elsif ($input eq '-') { } | |
| 37 | 0 | 5 | unless $io = 'IO::File'->new($input, 0) |
| 45 | 3 | 2 | if ($skip_header) { } |
| 1 | 1 | elsif ($use_header) { } | |
| 52 | 2 | 3 | if ($column_names) |
| 58 | 5 | 11 | if $io->eof |
| 59 | 0 | 11 | unless $csv->$fetch_row_method($io) |