Branch Coverage

blib/lib/PAGI/Headers.pm
Criterion Covered Total %
branch 27 34 79.4


line true false branch
67 62 188 if (defined $pairs)
68 0 62 unless ref $pairs eq "ARRAY"
81 1 159 unless defined $name
84 163 76 if _fold($p->[0]) eq $key
90 0 25 unless defined $name
97 0 197 unless defined $name and length $name
99 100 59 if _fold($p->[0]) eq $key
107 12 6 unless $seen{_fold($p->[0])}++
113 1 2 @{$_[0]{'pairs'};} ? :
119 0 46 unless defined $name
120 1 45 if grep {not defined $_;} @values
129 0 162 unless defined $name
130 2 160 if grep {not defined $_;} @values
137 12 84 if $self->has($name)
143 0 5 unless defined $name
167 2 0 if length $tok
185 2 3 if $multi