Branch Coverage
blib/lib/OptionHash.pm
Criterion
Covered
Total
%
branch
5
8
62.5
line
true
false
branch
26
0
5
unless ref $oh eq 'OptionHash'
27
0
5
unless ref $h eq 'HASH'
28
0
5
unless my $keys = $oh->{'keys'}
30
1
6
unless (exists $keys->{$_})