blib/lib/HTTP/UserAgentClientHints.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 19 | 20 | 95.0 |
line | true | false | branch |
---|---|---|---|
28 | 3 | 12 | if (exists $self->{'_value'}{$method}) |
36 | 1 | 12 | if (exists $self->{'_value_raw'}{$method}) |
57 | 8 | 48 | !$field || $field eq 'UA' ? : |
63 | 2 | 10 | unless defined $value |
65 | 2 | 8 | if ($field eq 'UA' or $field eq 'Full-Version-List') { } |
6 | 2 | elsif ($field =~ /^(?:Platform|Arch|Bitness|Model|Full-Version)$/) { } | |
2 | 0 | elsif ($field eq 'Mobile') { } | |
81 | 1 | 2 | unless ($http_headers_obj->can("header")) |
93 | 1 | 2 | unless $_[1] |
108 | 15 | 17 | if grep {lc $f eq lc $_;} @{$excepts;} |