Condition Coverage

blib/lib/Hash/Wrap.pm
Criterion Covered Total %
condition 44 81 54.3


and 3 conditions

line !l l&&!r l&&r condition
53 48 0 144 defined $_->[0] && defined $_->[1]
0 0 96 defined $candidate and 2 == grep({defined $_->[0] && defined $_->[1] ? $_->[0] eq $_->[1] : 1;} [$reftype->[0], &Scalar::Util::reftype($candidate)], [$reftype->[1], &Scalar::Util::reftype($$candidate)])
102 57 0 0 exists $REGISTRY{$hash_class}{'predicate_template'} and $key =~ /^has_(.*)/
169 53 3 1 not !$args->{'-base'} and exists $args->{'-class'}
180 7 0 2 $reftype ne "SCALAR" and $reftype ne "VSTRING"
7 1 1 $reftype ne "SCALAR" and $reftype ne "VSTRING" and $reftype ne "REF"
1 0 1 $reftype ne "SCALAR" and $reftype ne "VSTRING" and $reftype ne "REF" and $reftype ne "GLOB"
1 0 1 $reftype ne "SCALAR" and $reftype ne "VSTRING" and $reftype ne "REF" and $reftype ne "GLOB" and $reftype ne "LVALUE"
0 0 1 $reftype ne "SCALAR" and $reftype ne "VSTRING" and $reftype ne "REF" and $reftype ne "GLOB" and $reftype ne "LVALUE" and $reftype ne "REGEXP"
492 49 1 1 exists $args->{'-copy'} and exists $args->{'-clone'}
610 77 43 57 defined $closures and %$closures

or 2 conditions

line l !l condition
624 4 0 9 shift() // {}
6 0 0 shift() // {}
3 0 0 shift() // {}
2 0 0 shift() // {}
2 0 0 shift() // {}
5 1 0 shift() // {}
1 0 0 shift() // {}
3 0 0 shift() // {}
0 1 shift() // {}
5 0 shift() // {}
4 0 shift() // {}

or 3 conditions

line l !l&&r !l&&!r condition
33 0 0 0 ref $class || $class
39 10 0 0 &Scalar::Util::blessed($object) || ref $object || $object
136 5 27 0 *{$method;}{'CODE'} || _generate_accessor($CLASS, $class, $key)
171 0 0 56 $ENV{'HASH_WRAP_DEBUG'} // delete $args->{'-debug'}
553 7 10 32 $args->{'-as_scalar_ref'} or $args->{'-as_return'}
583 49 0 0 _compile_from_tpl(\$code, \%dict, {'$clone', $clone}) || _croak("error generating constructor (as $name) subroutine: $@\n$code")