| blib/lib/Catmandu/Exporter/MARC/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 12 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 6 | 20 | if (@data < 2) { } |
| 0 | 20 | elsif ($tag eq 'LDR') { } | |
| 4 | 16 | elsif ($tag =~ /^00/) { } | |
| 43 | 0 | 1 | if defined $data->{'leader'} |
| 49 | 7 | 1 | if (ref $val) { } |
| 73 | 334 | 12 | if ($tag =~ /^00/ || defined $data[$i] and defined $data[$i + 1] and $data[$i + 1] =~ /\S+/) |