| line |
!l |
l&&!r |
l&&r |
condition |
|
53
|
50 |
0 |
148 |
defined $_->[0] && defined $_->[1] |
|
|
0 |
0 |
99 |
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 |
4 |
exists $REGISTRY{$hash_class}{'predicate_template'} and $key =~ /^has_(.*)/ |
|
169
|
54 |
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
|
50 |
1 |
1 |
exists $args->{'-copy'} and exists $args->{'-clone'} |
|
610
|
81 |
44 |
58 |
defined $closures and %$closures |