| line |
!l |
l&&!r |
l&&r |
condition |
|
98
|
0 |
2 |
98 |
defined $ct and length $ct |
|
106
|
0 |
0 |
0 |
$STRICT_PARAMS and $ct =~ s[^($re_token_non_strict)/($re_token_non_strict)][] |
|
118
|
37 |
6 |
55 |
$STRICT_PARAMS and length $ct |
|
|
43 |
55 |
0 |
$STRICT_PARAMS and length $ct and not $ct =~ /^;/ |
|
141
|
0 |
2 |
45 |
defined $cd and length $cd |
|
147
|
0 |
0 |
0 |
$STRICT_PARAMS and $cd =~ s/^($re_token_non_strict)// |
|
159
|
10 |
7 |
28 |
$STRICT_PARAMS and length $cd |
|
|
17 |
28 |
0 |
$STRICT_PARAMS and length $cd and not $cd =~ /^;/ |
|
254
|
2 |
4 |
0 |
$needs_quote and grep /$re_invalid_for_quoted_value/, @continuous_value |
|
267
|
6 |
6 |
8 |
$value =~ /\P{ASCII}/ and length(my $oneparameter = "; $key*=" . join("", @continuous_value)) <= 78 |
|
325
|
32 |
0 |
0 |
$level != 0 and $STRICT_PARAMS |
|
353
|
0 |
0 |
42 |
defined $attribs->{$_} and $attribs->{$_} =~ /^$re_exvalue$/ |
|
373
|
18 |
125 |
0 |
length $_ and not $_ =~ /^;/ |
|
377
|
2 |
0 |
0 |
$STRICT_PARAMS and do {
carp("Missing semicolon before parameter '${_}'");
return $attribs
} |