| blib/lib/MAB2/Writer/XML.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 14 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 2 | 0 | if $self->xml_declaration |
| 17 | 2 | 0 | if $self->collection |
| 26 | 1 | 3 | if ($record->[0][0] eq 'LDR') { } |
| 28 | 1 | 0 | if $leader->[3] =~ /^\d{5}(\w)M2\.0\d*\s*(\w)$/ |
| 40 | 1 | 8 | if $field->[0] eq 'LDR' |
| 41 | 4 | 4 | if ($field->[2] eq '_') { } |
| 61 | 2 | 0 | if $self->collection |