| line |
true |
false |
branch |
|
23
|
34 |
0 |
if (my $rules = $args{'rules'}) { } |
|
25
|
22 |
12 |
Ref::Util::XS::is_hashref($rules) ? : |
|
39
|
19 |
37 |
if (Ref::Util::XS::is_ref($value)) { } |
|
41
|
16 |
3 |
if Ref::Util::XS::is_regexpref($value) |
|
43
|
2 |
1 |
if Ref::Util::XS::is_coderef($value) |
|
49
|
35 |
2 |
if defined $value |
|
71
|
3 |
57 |
if ($key eq "-not") |
|
72
|
2 |
1 |
$is_hash ? : |
|
75
|
1 |
59 |
unless $KEY2FN->{$key} |
|
81
|
8 |
105 |
if (Ref::Util::XS::is_ref($key)) { } |
|
83
|
6 |
2 |
if (Ref::Util::XS::is_regexpref($key)) { } |
|
|
2 |
0 |
elsif (Ref::Util::XS::is_coderef($key)) { } |
|
115
|
56 |
49 |
if (not Ref::Util::XS::is_blessed_ref($value) and Ref::Util::XS::is_arrayref($value) || Ref::Util::XS::is_hashref($value)) { } |
|
|
48 |
1 |
elsif (Ref::Util::XS::is_coderef($value) or Ref::Util::XS::is_regexpref($value) or not Ref::Util::XS::is_ref($value)) { } |
|
119
|
22 |
34 |
Ref::Util::XS::is_arrayref($value) ? : |
|
139
|
100 |
64 |
exists $hash->{$key} ? : |