| blib/lib/RandomJungle/File/RAW.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 20 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 82 | 2 | 8 | unless $obj->_init(%args) |
| 107 | 1 | 7 | unless (open my $infh, '<', $$self{'raw_file'}{'filename'}) |
| 130 | 3 | 14 | if ($name ne $labels[$i]) |
| 247 | 1 | 2 | unless (defined $iid) |
| 253 | 1 | 1 | unless (exists $$self{'raw_data'}{'data'}{$iid}) |
| 303 | 1 | 4 | unless (defined $sample_iid) |
| 309 | 1 | 3 | unless (exists $$self{'raw_data'}{'data'}{$sample_iid}) |
| 318 | 1 | 2 | if (exists $params{'orig'} and $params{'orig'} == 1) |
| 412 | 1 | 9 | if (not defined $$self{'filename'}) { } |
| 1 | 8 | elsif (not -e $$self{'filename'}) { } |