| 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 |