Branch Coverage

blib/lib/Hash/Match.pm
Criterion Covered Total %
branch 30 32 93.7


line true false branch
25 34 0 if (my $rules = $args{'rules'}) { }
27 22 12 XXX ? :
41 19 37 if (XXX) { }
43 16 3 if XXX
45 2 1 if XXX
51 35 2 if defined $value
73 3 57 if ($key eq "-not")
75 2 1 $ctx eq 'HASH' ? :
78 1 59 unless $KEY2FN{$key}
84 8 105 if (my $key_ref = ref $key) { }
86 6 2 if (XXX) { }
2 0 elsif (XXX) { }
120 56 49 if ($match_ref =~ /^(?:ARRAY|HASH)$/) { }
48 1 elsif ($match_ref =~ /^(?:Regexp|CODE|)$/) { }
124 22 34 $match_ref eq 'ARRAY' ? :
144 103 61 exists $hash->{$key} ? :