Branch Coverage

blib/lib/Tie/RegexpHash.pm
Criterion Covered Total %
branch 23 36 63.8


line true false branch
50 3 6 if $flags
60 3 16 unless ($$self{'COUNT'})
64 4 12 if (ref $key eq 'Regexp') { }
71 1 3 if ($i == $$self{'COUNT'}) { }
84 1 11 if ($i == $$self{'COUNT'}) { }
99 5 1 if ref $key eq 'Regexp'
102 1 5 if (defined $index) { }
103 0 1 if ($key ne $$self{'KEYS'}[$index])
112 1 4 unless ref $key eq 'Regexp'
132 12 0 if (defined $index) { }
145 0 0 if ref $key eq 'Regexp'
149 0 0 if (defined $index) { }
150 0 0 if ($key ne $$self{'KEYS'}[$index])
192 0 1 unless ($$self{'COUNT'})
204 0 1 unless ($$self{'COUNT'})
210 0 1 unless (defined $index)
216 1 0 if ($index == $$self{'COUNT'}) { }
256 0 2 $flags ? :