Condition Coverage

blib/lib/Data/Transform/ExplicitMetadata.pm
Criterion Covered Total %
condition 47 77 61.0


and 3 conditions

line !l l&&!r l&&r condition
123 7 11 3 $reftype eq 'SCALAR' and defined $blesstype
18 3 0 $reftype eq 'SCALAR' and defined $blesstype and $blesstype eq 'Regexp'
3 11 0 ref $value eq 'SCALAR' and &Scalar::Util::isvstring($$value)
274 1 0 4 $package and $name
1 0 4 $package and $name and $package ne 'Symbol'
0 0 4 $package and $name and $package ne 'Symbol' and not $name =~ /GEN\d/
353 0 0 3 $value->{'PACKAGE'} ne 'Symbol' && !($value->{'NAME'} =~ /^GEN\d+/) && $value->{'NAME'} =~ /^\w/
390 37 1 6 $blessed and not $input->{'__recursive'}
420 44 0 0 $blesstype and $reftype

or 2 conditions

line l !l condition
19 5 0 eval { do { require FileHandle::Fmode } } || ''
83 38 21 $path_expr ||= '$VAR'
84 38 21 $seen ||= {}
317 28 16 $recursive_queue ||= []

or 3 conditions

line l !l&&r !l&&!r condition
57 7 0 0 _get_open_mode_fcntl($fh) || $HAS_FMODE && _get_open_mode_filehandle_fmode($fh)
72 0 0 52 $ref eq 'GLOB' or $ref eq 'VSTRING'
0 0 52 $ref eq 'GLOB' or $ref eq 'VSTRING' or &Scalar::Util::isvstring($value)
104 16 6 64 $reftype eq 'SCALAR' or $reftype eq 'REF'
123 0 0 21 $reftype eq 'REGEXP' or $reftype eq 'SCALAR' and defined $blesstype and $blesstype eq 'Regexp'
0 0 14 $reftype eq 'VSTRING' or ref $value eq 'SCALAR' and &Scalar::Util::isvstring($$value)
298 1 0 0 open $fh, '>&=', $fileno or open $fh, '<&=', $fileno
357 3 3 8 $type eq 'NAME' or $type eq 'PACKAGE'
6 0 8 $type eq 'NAME' or $type eq 'PACKAGE' or $type eq 'IOseek'
3 0 8 $type eq 'NAME' or $type eq 'PACKAGE' or $type eq 'IOseek' or $type eq 'IOmode'
418 4 0 40 $reftype eq 'GLOB' or $reftype eq 'VSTRING'
4 0 40 $reftype eq 'GLOB' or $reftype eq 'VSTRING' or exists $input->{'__refaddr'}
420 0 44 0 $blesstype and $reftype or not $blesstype
442 7 0 3 $reftype eq 'SCALAR' && !ref($value) || $reftype eq ref $value || $reftype eq 'GLOB' && exists $value->{'SCALAR'} || $reftype eq 'CODE' && $value && ref $value eq '' || $reftype eq 'REF' && ref $value eq 'HASH' && exists $value->{'__reftype'} || $reftype eq 'REGEXP' && ref $value eq 'ARRAY' || $reftype eq 'VSTRING' && ref $value eq 'ARRAY' || $reftype && !ref($input->{'__value'}) && $input->{'__recursive'} || $input->{'__tied'} && ref $input->{'__value'} && $input->{'__value'}{'__blessed'}