Branch Coverage

blib/lib/Hash/WithDefaults.pm
Criterion Covered Total %
branch 0 166 0.0


line true false branch
17 0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
0 0 unless (@_)
0 0 if (ref $_[0] eq 'ARRAY') { }
0 0 elsif (@_ % 2 == 0) { }
0 0 if (@_ == 1 and ref $_[0] eq 'HASH') { }
63 0 0 if (@_ == 0)
69 0 0 if (not ref $_[0] and ref $_[1] eq 'HASH' || @_ % 2 == 1) { }
72 0 0 if ($type =~ /^(?:sensitive|preserve|lower|upper|tolower|toupper)$/) { }
124 0 0 if exists $_[0][0]{$lc_key}
128 0 0 if exists $$default{$_[1]}
136 0 0 if exists $_[0][0]{lc $_[1]}
140 0 0 if exists $$default{$_[1]}
157 0 0 if (($key, $val) = each %{$$self[0];}) { }
0 0 elsif (@{$$self[1];}) { }
159 0 0 wantarray ? :
171 0 0 unless (defined $$self[2])
173 0 0 if (($key, $val) = each %{$$self[0];}) { }
175 0 0 wantarray ? :
178 0 0 if (not @{$$self[1];}) { }
191 0 0 wantarray ? :
0 0 unless $$seen{lc $key}++
196 0 0 if exists $$self[1][$$self[2]]
226 0 0 if exists $_[0][0]{lc $_[1]}
230 0 0 if exists $$default{$_[1]}
238 0 0 if exists $_[0][0]{lc $_[1]}
242 0 0 if exists $$default{$_[1]}
259 0 0 if (($key, $val) = each %{$$self[0];}) { }
0 0 elsif (@{$$self[1];}) { }
261 0 0 wantarray ? :
274 0 0 if ($$self[2] == -1)
276 0 0 if (($key, $val) = each %{$$self[0];}) { }
278 0 0 wantarray ? :
282 0 0 if (not @$defaults) { }
293 0 0 wantarray ? :
0 0 unless $$seen{lc $key}++
298 0 0 if exists $$defaults[$$self[2]]
328 0 0 if exists $_[0][0]{uc $_[1]}
332 0 0 if exists $$default{$_[1]}
340 0 0 if exists $_[0][0]{uc $_[1]}
344 0 0 if exists $$default{$_[1]}
361 0 0 if (($key, $val) = each %{$$self[0];}) { }
0 0 elsif (@{$$self[1];}) { }
363 0 0 wantarray ? :
376 0 0 if ($$self[2] == -1)
378 0 0 if (($key, $val) = each %{$$self[0];}) { }
380 0 0 wantarray ? :
384 0 0 if (not @$defaults) { }
395 0 0 wantarray ? :
0 0 unless $$seen{uc $key}++
400 0 0 if exists $$defaults[$$self[2]]
431 0 0 if exists $_[0][0]{$_[1]}
435 0 0 if exists $$default{$_[1]}
443 0 0 if exists $_[0][0]{$_[1]}
447 0 0 if exists $$default{$_[1]}
464 0 0 if (($key, $val) = each %{$$self[0];}) { }
0 0 elsif (@{$$self[1];}) { }
466 0 0 wantarray ? :
479 0 0 if ($$self[2] == -1)
481 0 0 if (($key, $val) = each %{$$self[0];}) { }
483 0 0 wantarray ? :
487 0 0 if (not @$defaults) { }
498 0 0 wantarray ? :
0 0 unless $$seen{$key}++
503 0 0 if exists $$defaults[$$self[2]]