Branch Coverage

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


line true false branch
67 62 186 if (defined $pairs)
68 0 62 unless ref $pairs eq "ARRAY"
81 1 158 unless defined $name
84 162 76 if _fold($p->[0]) eq $key
90 0 25 unless defined $name
97 0 195 unless defined $name and length $name
99 99 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 160 unless defined $name
130 2 158 if grep {not defined $_;} @values
137 12 83 if $self->has($name)
143 0 5 unless defined $name
167 2 0 if length $tok
185 2 3 if $multi