Branch Coverage

blib/lib/HTTP/Config.pm
Criterion Covered Total %
branch 34 34 100.0


line true false branch
26 1 17 if (@_ == 2)
44 31 5 if (not exists $item->{$k} or $spec{$k} ne $item->{$k})
51 2 6 unless wantarray
58 1 1 if wantarray
65 5 1 if @$removed
178 16 1 if (@_ == 1)
179 7 9 if ($_[0]->can("request"))
181 1 6 unless defined $_[0]
183 9 7 if $_[0] and $_[0]->can("uri_canonical")
186 8 9 unless ref $uri
195 4 110 if $mkey =~ s/__(.*)/__/
196 67 47 if (my $m = $MATCH{$mkey})
199 4 63 defined $k ? :
204 62 5 unless ref $v eq "ARRAY"
208 34 38 if $c
210 33 34 unless $c
220 16 1 if wantarray