| line |
true |
false |
branch |
|
20
|
1 |
39 |
$ENV{'HTTPS'} ? :
|
|
42
|
2 |
38 |
if (defined $pre)
|
|
45
|
1 |
1 |
if (defined $ENV{"HTTP_${pre}REMOTE_ADDR"})
|
|
48
|
1 |
0 |
$ENV{"HTTP_${pre}HTTPS"} ? :
|
|
54
|
2 |
38 |
if ($path =~ s[\A\w+://(?:[^/\@]*@)?([^/]+)][]msx)
|
|
60
|
1 |
39 |
unless (length $path)
|
|
66
|
3 |
37 |
if ($ENV{'HTTP_AUTHORIZATION'})
|
|
67
|
2 |
1 |
if ($ENV{'HTTP_AUTHORIZATION'} =~ /\ABasic\s+(\S+)\z/msx)
|
|
69
|
2 |
0 |
if (defined $pass)
|
|
75
|
1 |
2 |
unless (defined $$self{'REMOTE_PASS'})
|
|
82
|
14 |
26 |
if ($ENV{'REQUEST_METHOD'} eq 'POST' or $ENV{'REQUEST_METHOD'} eq 'PUT') { }
|
|
84
|
2 |
12 |
if ($$opt{'post_with_get'})
|
|
91
|
39 |
1 |
unless ($$opt{'keep_all_values'})
|
|
95
|
37 |
3 |
unless ($$opt{'raw'})
|
|
104
|
12 |
2 |
if (defined $name) { }
|
|
107
|
16 |
8 |
if (exists $$self{$method}{$name})
|
|
109
|
6 |
10 |
ref $value ? :
|
|
112
|
6 |
6 |
wantarray ? :
|
|
115
|
0 |
2 |
unless $$self{'POST'}
|
|
|
0 |
2 |
unless $$self{'GET'}
|
|
123
|
0 |
156 |
unless $p
|
|
124
|
44 |
10 |
unless ($name =~ /\[\]\z/msx)
|
|
137
|
0 |
185 |
unless $$self{$key}
|
|
138
|
16 |
47 |
if (ref $$self{$key}{$name}) { }
|
|
140
|
22 |
0 |
unless ($key eq 'POST' and defined $$self{'mimetype'}{$name}[$i])
|
|
146
|
45 |
2 |
unless ($key eq 'POST' and defined $$self{'mimetype'}{$name})
|
|
164
|
0 |
9 |
unless defined $value
|
|
169
|
0 |
9 |
if exists $$self{'cookie'}{$key}
|
|
185
|
1 |
13 |
if ($$self{'ENV'}{'CONTENT_LENGTH'} > $max_post)
|
|
191
|
13 |
0 |
if ($$self{'ENV'}{'CONTENT_LENGTH'} > 0)
|
|
195
|
1 |
12 |
if ($n != $$self{'ENV'}{'CONTENT_LENGTH'})
|
|
204
|
12 |
0 |
if ($$self{'ENV'}{'CONTENT_TYPE'})
|
|
205
|
2 |
10 |
if ($$self{'ENV'}{'CONTENT_TYPE'} =~ /$multipart/msx) { }
|
|
|
10 |
0 |
elsif ($$self{'ENV'}{'CONTENT_TYPE'} eq 'application/x-www-form-urlencoded') { }
|