| blib/lib/Catmandu/Importer/MARC/Decoder.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 12 | 66.6 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 4 | 40 | unless eval { do { $record->isa('MARC::Record') } } |
| 35 | 166 | 680 | if ($field->is_control_field) |
| 48 | 39 | 1 | if ($id =~ /^00/ and $record->field($id)) { } |
| 0 | 1 | elsif ($id =~ /^([0-9]{3})([[0-9a-zA-Z])$/) { } | |
| 0 | 1 | elsif (defined $id and $record->field($id)) { } | |
| 53 | 0 | 0 | if $field |