Condition Coverage

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


and 3 conditions

line !l l&&!r l&&r condition
111 881 0 165 defined $var and $var ne ''
258 0 23 4 not $field->is_control_field and $ttype eq 'update' || $ttype eq 'forceupdate'
273 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)
333 2 13 27 not $updatefield->is_control_field and $ttype eq 'update' || $ttype eq 'forceupdate'
347 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)
638 1 0 2 $1 < 10 and $2 < 10
0 0 1 $1 >= 10 and $2 >= 10
650 3 0 1 $1 < 10 and $2 < 10
0 0 3 $1 >= 10 and $2 >= 10
677 2 0 1 $1 < 10 and $2 < 10
0 0 2 $1 >= 10 and $2 >= 10
689 0 0 0 $1 < '010' and $2 < '010'
0 0 0 $1 >= '010' and $2 >= '010'
844 0 4 58 $subtag ne 'tempvalueforcurrentfield' and $tag >= 10
874 0 2 56 $record and $record->fields

or 3 conditions

line l !l&&r !l&&!r condition
169 29 5 53 $ttype eq 'forceupdate' or $ttype eq 'forceupdatefirst'
170 28 0 6 ref $field eq '' or ref $field eq 'SCALAR'
174 60 0 0 ref $field eq '' or ref $field eq 'SCALAR'
177 0 0 27 $tag eq 'i1' or $tag eq "\302\265"
0 0 27 $tag eq 'i2' or $tag eq "\302\243"
181 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
186 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
189 27 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
258 14 3 10 $ttype eq 'update' || $ttype eq 'forceupdate'
274 2 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
289 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'
293 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'
296 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
301 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
333 14 17 9 $ttype eq 'update' || $ttype eq 'forceupdate'
348 13 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
374 0 0 35 $tag eq 'i1' or $tag eq "\302\265"
0 0 35 $tag eq 'i2' or $tag eq "\302\243"
376 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
380 0 0 0 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
383 31 0 4 ref $subfields->{$tag} eq '' or ref $subfields->{$tag} eq 'SCALAR'
484 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'
487 77 0 1 ref $intaction->{$kint} eq '' or ref $intaction->{$kint} eq 'SCALAR'
505 19 0 3 ref $subint->{$k} eq '' or ref $subint->{$k} eq 'SCALAR'
634 3 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'
636 7 0 0 ref $vint eq '' or ref $vint eq 'SCALAR'
713 9 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'
715 6 0 0 ref $vint eq '' or ref $vint eq 'SCALAR'
767 7 0 0 ref $intaction eq '' or ref $intaction eq 'SCALAR'