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