Branch Coverage

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


line true false branch
51 3 6 if $flags
61 3 16 unless ($$self{'COUNT'})
65 4 12 if (ref $key eq 'Regexp') { }
72 1 3 if ($i == $$self{'COUNT'}) { }
85 1 11 if ($i == $$self{'COUNT'}) { }
100 5 1 if ref $key eq 'Regexp'
103 1 5 if (defined $index) { }
104 0 1 if ($key ne $$self{'KEYS'}[$index])
113 1 4 unless ref $key eq 'Regexp'
133 12 0 if (defined $index) { }
146 0 0 if ref $key eq 'Regexp'
150 0 0 if (defined $index) { }
151 0 0 if ($key ne $$self{'KEYS'}[$index])
193 0 1 unless ($$self{'COUNT'})
205 0 1 unless ($$self{'COUNT'})
211 0 1 unless (defined $index)
217 1 0 if ($index == $$self{'COUNT'}) { }
257 0 2 $flags ? :