| blib/lib/Tie/Array/FileWriter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 16 | 43.7 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 0 | 1 | unless defined $fdelim |
| 22 | 0 | 1 | unless defined $rdelim |
| 27 | 0 | 1 | if (ref $file eq 'FileHandle') { } |
| 28 | 0 | 0 | unless $fh->opened |
| 36 | 0 | 1 | unless defined $fh |
| 63 | 0 | 2 | unless defined $elem |
| 64 | 0 | 2 | unless ref $elem eq 'ARRAY' |
| 106 | 0 | 1 | unless shift() == 0 |