blib/lib/Catmandu/Importer/MARC/Decoder.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
23 | 13 | 123 | unless eval { do { $record->isa('MARC::Record') } } |
35 | 492 | 1772 | if ($field->is_control_field) |
48 | 111 | 12 | if ($id =~ /^00/ and $record->field($id)) { } |
10 | 2 | elsif ($id =~ /^([0-9]{3})([[0-9a-zA-Z])$/) { } | |
0 | 2 | elsif (defined $id and $record->field($id)) { } | |
53 | 10 | 0 | if $field |