Branch Coverage

Set/Hash.pm
Criterion Covered Total %
branch 53 80 66.2


line true false branch
27 0 36 if not %hash and ref $class
34 0 2 if (want('OBJECT') or not defined wantarray)
38 1 1 if wantarray
47 6 3 if (want('OBJECT') or not defined wantarray)
52 3 0 if wantarray
58 0 6 if $reversed
63 1 12 unless (exists $$op2{$key})
69 3 9 unless $$op1{$key} == $$op2{$key}
72 2 4 if (want('OBJECT') or not defined wantarray)
77 2 2 if wantarray
85 2 4 unless exists $$self{$key}
92 0 6 if $reversed
97 3 12 unless exists $$op2{$key}
98 9 3 if ($$op1{$key} == $$op2{$key})
104 2 4 if (want('OBJECT') or not defined wantarray)
109 2 2 if wantarray
115 0 2 if $reversed
118 0 2 unless scalar CORE::keys %$op1 == scalar CORE::keys %$op2
122 1 3 unless $$op1{$key} == $$op2{$key}
130 2 3 if (want('OBJECT') or not defined wantarray)
134 2 1 if wantarray
142 20 3 if (reftype $self eq 'HASH') { }
149 0 23 if (want('OBJECT') or not defined wantarray)
157 0 2 if $reversed
160 0 2 unless scalar CORE::keys %$op1 == scalar CORE::keys %$op2
164 1 3 unless $$op1{$key} == $$op2{$key}
171 0 0 if $char >= 1
173 0 0 if (reftype $self eq 'HASH')
174 0 0 if (reftype $self eq 'ARRAY')
175 0 0 if (reftype $self eq 'SCALAR')
176 0 0 if $char
184 0 2 if (ref $args[0] eq 'Set::Hash')
214 1 4 if (want('OBJECT') or not defined wantarray)
220 2 2 if (wantarray)
221 2 0 if (defined wantarray)
230 1 0 if wantarray
231 0 0 if defined wantarray
238 0 0 if $reversed
246 1 3 if (want('OBJECT') or not defined wantarray)
250 2 1 if wantarray