Branch Coverage

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


line true false branch
40 1 204 unless (exists $HTTP_FIELD_MAP{$field})
46 1 203 unless ($checker)
51 4 199 unless defined $value
53 1 198 unless (&$checker($value))
75 1 147 unless (builtin::blessed($headers))
79 96 51 if ($headers->isa('HTTP::Headers')) { }
48 3 elsif ($headers->can('exists') and $headers->can('get') and $headers->can('set')) { }
80 4 92 if (defined $headers->header($http_field)) { }
81 2 2 if ($headers->header($http_field) eq \"")
90 2 46 if (defined $headers->get($http_field)) { }
45 1 elsif (not $headers->exists($http_field)) { }
91 1 1 if ($headers->get($http_field) eq \"")
149 4 130 unless ($name and $value)
153 2 128 unless ($checker)
156 1 127 unless (&$checker($value))
183 8 23 unless $_[0] eq "SAMEORIGIN"
195 25 6 unless $_[0] eq 0 or $_[0] eq 1