| line |
true |
false |
branch |
|
22
|
0 |
13 |
$#_ == 0 ? : |
|
44
|
4 |
16 |
if (exists $env->{'FCGI_ROLE'}) |
|
54
|
4 |
16 |
if $path =~ m[^/] |
|
57
|
5 |
15 |
if (exists $args{-'path_info'}) { } |
|
|
9 |
6 |
elsif (exists $args{-'base'}) { } |
|
74
|
0 |
1 |
unless $self->{'env'}{'REQUEST_METHOD'} |
|
106
|
5 |
4 |
unless ($params) |
|
111
|
1 |
0 |
if (not exists $params->{$k}) { } |
|
116
|
0 |
0 |
if (ref $val) { } |
|
119
|
0 |
0 |
ref $v ? : |
|
125
|
8 |
1 |
unless @_ |
|
126
|
0 |
1 |
unless exists $$params{$_[0]} |
|
128
|
0 |
1 |
if (ref $res) |
|
129
|
0 |
0 |
wantarray ? : |
|
140
|
5 |
0 |
unless ($content_type or $content_length) |
|
148
|
0 |
0 |
if ($input) { } |
|
159
|
0 |
0 |
$content_length < 8192 ? : |
|
163
|
0 |
0 |
if ($read == 0 and $spin++ > 2000) |
|
186
|
0 |
0 |
unless (exists $self->{'http.body'}) |
|
207
|
0 |
0 |
if (my $fd = $self->body) |
|
224
|
0 |
5 |
if ($name eq 'Set-Cookie') { } |
|
245
|
0 |
4 |
if ($cookie) |
|
250
|
1 |
3 |
if (my $cookies = delete $headers{'Set-Cookie'}) |
|
253
|
2 |
0 |
if (ref $c eq 'HASH') { } |
|
257
|
1 |
1 |
if (my $expires = $c->{'expires'}) |
|
277
|
1 |
0 |
if (exists $self->{'fd'}) { } |
|
279
|
0 |
1 |
if utf8::is_utf8($line) |
|
296
|
0 |
1 |
if ($self->_parsed_cookies) |