| blib/lib/Catmandu/Exporter/MARC/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 10 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 15 | 0 | 8 | if ($tag eq 'LDR') { } |
| 2 | 6 | elsif ($tag =~ /^00/) { } | |
| 35 | 0 | 1 | if defined $data->{'leader'} |
| 41 | 7 | 1 | if (ref $val) { } |
| 65 | 309 | 6 | if ($tag =~ /^00/ || defined $data[$i] and defined $data[$i + 1] and $data[$i + 1] =~ /\S+/) |