| blib/lib/SVG/VCD.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 10 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 31 | 0 | 0 | unless my $f = 'IO::File'->new("<$filename") |
| 41 | 0 | 0 | if $line eq '' |
| 43 | 0 | 0 | if not defined $key or $key eq '' |
| 45 | 0 | 0 | if ($star) |
| 49 | 0 | 0 | if ($key eq 'taxon' and keys %fields > 1) |