Branch Coverage

blib/lib/MARC/Utils/MARC2Ini.pm
Criterion Covered Total %
branch 20 22 90.9


line true false branch
25 33 62 if /^ / or / $/
43 4 23 if ($field->is_control_field) { }
78 47 236 if (/^\s*[#;]/ or /^\s*$/)
81 46 190 if (/^\[([^\]]*)\]/)
83 44 2 if @field
89 190 0 if (/^\s*([^=:]+?)\s*[=:]\s*(.*)$/)
92 79 111 if $data =~ /^(['"])(.*)\1$/
96 10 180 if ($section eq '_') { }
97 2 8 if ($tag eq 'leader') { }
102 92 88 if ($tag =~ /^ind[12]$/) { }
106 2 0 if @field