| blib/lib/CSV/HistoryPlayer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 243 | 37 | 1 | if (&$dir_filter($dir)) |
| 245 | 32 | 18 | if -d $c |
| 246 | 16 | 34 | if $c =~ /\.csv$/i and -s -r -f(_) |
| 270 | 0 | 9 | unless my $csv = 'Text::CSV'->new({'binary', 1}) |
| 284 | 30 | 3 | unless (defined $lines[$idx] or $cluster_csvs[$idx]->eof) |
| 294 | 21 | 9 | if (@ordered_idx) { } |
| 301 | 6 | 3 | if ($cluster_idx < @$clusters - 1) |
| 314 | 1 | 2 | if $self->_current_data |
| 323 | 22 | 2 | unless ($result) |