Condition Coverage

lib/MARC/Transform.pm
Criterion Covered Total %
condition 84 171 49.1


and 3 conditions

line !l l&&!r l&&r condition
106 881 0 165 defined $var and $var ne ''
253 0 23 4 not $field->is_control_field and $ttype eq 'update' || $ttype eq 'forceupdate'
268 0 0 17 $tag ne 'i1' and $tag ne "\302\265"
0 0 17 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2'
0 0 17 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2' and $tag ne "\302\243"
0 15 2 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2' and $tag ne "\302\243" and not defined $newfield->subfield($tag)
328 2 13 27 not $updatefield->is_control_field and $ttype eq 'update' || $ttype eq 'forceupdate'
342 0 0 34 $tag ne 'i1' and $tag ne "\302\265"
0 0 34 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2'
0 0 34 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2' and $tag ne "\302\243"
0 21 13 $tag ne 'i1' and $tag ne "\302\265" and $tag ne 'i2' and $tag ne "\302\243" and not defined $newfield->subfield($tag)
633 1 0 2 $1 < 10 and $2 < 10
0 0 1 $1 >= 10 and $2 >= 10
645 3 0 1 $1 < 10 and $2 < 10
0 0 3 $1 >= 10 and $2 >= 10
672 2 0 1 $1 < 10 and $2 < 10
0 0 2 $1 >= 10 and $2 >= 10
684 0 0 0 $1 < '010' and $2 < '010'
0 0 0 $1 >= '010' and $2 >= '010'
839 0 4 58 $subtag ne 'tempvalueforcurrentfield' and $tag > 10
869 0 2 56 $record and $record->fields

or 3 conditions

line l !l&&r !l&&!r condition
164 29 5 53 $ttype eq 'forceupdate' or $ttype eq 'forceupdatefirst'
165 28 0 6 ref $field eq '' or ref $field eq 'SCALAR'
169 60 0 0 ref $field eq '' or ref $field eq 'SCALAR'
172 0 0 27 $tag eq 'i1' or $tag eq "\302\265"
0 0 27 $tag eq 'i2' or $tag eq "\302\243"
176 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
181 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
184 27 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
253 14 3 10 $ttype eq 'update' || $ttype eq 'forceupdate'
269 2 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
284 10 4 46 $ttype eq 'update' or $ttype eq 'updatefirst'
14 17 29 $ttype eq 'update' or $ttype eq 'updatefirst' or $ttype eq 'forceupdate'
21 1 28 $ttype eq 'update' or $ttype eq 'updatefirst' or $ttype eq 'forceupdate' or $ttype eq 'forceupdatefirst'
288 0 0 46 $tag eq 'i1' or $tag eq "\302\265"
0 0 46 $tag eq 'i2' or $tag eq "\302\243"
46 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
291 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
296 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
328 14 17 9 $ttype eq 'update' || $ttype eq 'forceupdate'
343 13 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
369 0 0 35 $tag eq 'i1' or $tag eq "\302\265"
0 0 35 $tag eq 'i2' or $tag eq "\302\243"
371 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
375 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
378 31 0 4 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
479 20 22 42 $type eq 'create' or $type eq 'forceupdate'
42 11 31 $type eq 'create' or $type eq 'forceupdate' or $type eq 'update'
33 3 28 $type eq 'create' or $type eq 'forceupdate' or $type eq 'update' or $type eq 'forceupdatefirst'
14 3 25 $type eq 'create' or $type eq 'forceupdate' or $type eq 'update' or $type eq 'forceupdatefirst' or $type eq 'updatefirst'
482 77 0 1 ref $intaction->{$kint} eq '' or ref $intaction->{$kint} eq 'SCALAR'
500 19 0 3 ref $subint->{$k} eq '' or ref $subint->{$k} eq 'SCALAR'
629 3 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'
631 7 0 0 ref $vint eq '' or ref $vint eq 'SCALAR'
708 9 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'
710 6 0 0 ref $vint eq '' or ref $vint eq 'SCALAR'
762 7 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'