Branch Coverage

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