Branch Coverage

blib/lib/Test/Deep/HashRec.pm
Criterion Covered Total %
branch 9 18 50.0


line true false branch
46 0 1 unless ref $val eq 'HASH'
61 0 1 if keys %copy
67 0 1 if @dupes
90 0 1 unless (ref $got eq 'HASH')
99 1 0 unless ($self->{'allow_unknown'})
101 0 1 if (@unknown)
106 0 1 if (my(@missing) = grep({not exists $got->{$_};} keys %{$$self{'required'};}))
110 0 1 if (@errors)
117 1 0 exists $self->{'required'}{$_} ? :