blib/lib/HTTP/UserAgentClientHints.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 20 | 20 | 100.0 |
line | true | false | branch |
---|---|---|---|
29 | 3 | 14 | if (exists $self->{'_value'}{$method}) |
37 | 1 | 14 | if (exists $self->{'_value_raw'}{$method}) |
58 | 8 | 56 | !$field || $field eq 'UA' ? : |
64 | 3 | 11 | unless defined $value |
66 | 2 | 9 | if ($field eq 'UA' or $field eq 'Full-Version-List') { } |
6 | 3 | elsif ($field =~ /^(?:Platform|Arch|Bitness|Model|Full-Version)$/) { } | |
2 | 1 | elsif ($field eq 'Mobile') { } | |
82 | 1 | 2 | unless ($http_headers_obj->can("header")) |
94 | 1 | 2 | unless $_[1] |
109 | 15 | 21 | if grep {lc $f eq lc $_;} @{$excepts;} |