Branch Coverage

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