blib/lib/Catmandu/Importer/MARC/ISO.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
99 | 9 | 82 | unless eval { do { $record->isa('MARC::Record') } } |
111 | 324 | 1088 | if ($field->is_control_field) |
125 | 71 | 11 | if ($id =~ /^00/ and $record->field($id)) { } |
10 | 1 | elsif ($id =~ /^([0-9]{3})([0-9a-zA-Z])$/) { } | |
0 | 1 | elsif (defined $id and $record->field($id)) { } | |
130 | 10 | 0 | if $field |