| line |
!l |
l&&!r |
l&&r |
condition |
|
144
|
4 |
12 |
12 |
$buf =~ /^(?: # nothing left over
| [\xC2-\xDF] # incomplete 2-byte char
| [\xE0-\xEF] [\x80-\xBF]? # incomplete 3-byte char
| [\xF0-\xF4] [\x80-\xBF]{0,2} # incomplete 4-byte char
)\z/x and $test =~ /[^\x00-\x7F]/ |
|
153
|
16 |
36 |
20 |
defined $encoding and $options->{'encoding'} |
|
|
36 |
11 |
9 |
defined $encoding and $options->{'encoding'} and not ref $encoding |
|
227
|
70 |
10 |
5 |
$name eq 'http-equiv' and $value eq 'content-type' |
|
|
61 |
0 |
19 |
$name eq 'content' and not defined $charset |
|
238
|
9 |
41 |
13 |
defined $need_pragma and !$need_pragma || $got_pragma |