Branch Coverage

blib/lib/HTTP/AcceptLanguage.pm
Criterion Covered Total %
branch 40 40 100.0


line true false branch
16 87 14 if ($header)
34 107 60 unless defined $quality
35 14 153 unless $language and $quality > 0
44 146 7 if (not exists $high_qualities{$language} or $quality > $high_qualities{$language})
52 142 4 $high_qualities{$language} == $$_{'quality'} ? :
146 7 $high_qualities{$language} ? :
70 143 6 $_ ? :
76 12 72 unless scalar @normlized_languages
78 4 68 unless (scalar @{$$self{'parsed_header'};})
90 33 35 if ($MATCH_PRIORITY_0_01_STYLE) { }
94 29 33 if (scalar %header_tags)
97 25 15 if $header_tags{$$tag{'tag_lc'}}
100 2 2 if $header_primary_tags{$$tag{'tag_lc'}}
106 39 15 if ($current_quality != $$language{'quality'})
109 6 33 if $ret
118 4 44 if $$language{'language'} eq '*'
125 21 2 if $ret
130 3 34 if $$language{'language'} eq '*'
134 24 32 if $$language{'language_lc'} eq $$tag{'tag_lc'}
137 6 8 if $$language{'language_primary_lc'} eq $$tag{'tag_lc'}