| blib/lib/Data/Dataset/Classic/Titanic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 18 | 61.1 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 4 | unless $file and -e $file |
| 29 | 0 | 1 | unless my $csv = 'Text::CSV_XS'->new({'binary', 1}) |
| 32 | 0 | 1 | unless open my $fh, '<', $file |
| 39 | 1 | 891 | if $counter == 1 |
| 55 | 0 | 1 | unless my $csv = 'Text::CSV_XS'->new({'binary', 1}) |
| 58 | 0 | 1 | unless open my $fh, '<', $file |
| 67 | 1 | 891 | if ($counter == 1) |
| 90 | 0 | 1 | unless my $csv = 'Text::CSV_XS'->new({'binary', 1}) |
| 93 | 0 | 1 | unless open my $fh, '<', $file |