| line |
true |
false |
branch |
|
23
|
2 |
11 |
if (not $_[0]{'CONTENT_LENGTH'}) { } |
|
|
6 |
5 |
elsif (index($ct, 'application/x-www-form-urlencoded') >= 0) { } |
|
|
5 |
0 |
elsif (index($ct, 'multipart/form-data') >= 0) { } |
|
35
|
2 |
6 |
ref $p->{$_} eq 'ARRAY' ? : |
|
47
|
2 |
6 |
if (not $_[0]{'CONTENT_LENGTH'}) { } |
|
|
2 |
4 |
elsif (index(lc($_[0]{'CONTENT_TYPE'} || ''), 'multipart/form-data') == -1) { } |
|
63
|
3 |
4 |
if (my $body = get_unpacked_body_object_from($_[0])) |
|
67
|
0 |
1 |
ref $u->{$k} eq 'ARRAY' ? : |
|
77
|
0 |
5 |
if $final->{$k} |
|
79
|
0 |
5 |
unless $v |
|
107
|
2 |
851 |
unless (($name, $value) = split(/=/, $pair, 2)) == 2 |
|
139
|
4 |
0 |
$cl < 8192 ? : |
|
144
|
0 |
4 |
if ($read == 0 and $spin++ > 2000) |