| line |
true |
false |
branch |
|
22
|
0 |
14 |
$#_ == 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'}
|
|
107
|
5 |
4 |
unless ($params)
|
|
112
|
0 |
1 |
if (exists $params->{$k}) { }
|
|
117
|
0 |
0 |
if (ref $val) { }
|
|
120
|
0 |
0 |
ref $v ? :
|
|
126
|
8 |
1 |
unless @_
|
|
127
|
0 |
1 |
unless exists $$params{$_[0]}
|
|
129
|
0 |
1 |
if (ref $res)
|
|
130
|
0 |
0 |
wantarray ? :
|
|
141
|
5 |
0 |
unless ($content_type or $content_length)
|
|
149
|
0 |
0 |
if ($input) { }
|
|
160
|
0 |
0 |
$content_length < 8192 ? :
|
|
164
|
0 |
0 |
if ($read == 0 and $spin++ > 2000)
|
|
187
|
0 |
0 |
unless (exists $self->{'http.body'})
|
|
208
|
0 |
0 |
if (my $fd = $self->body)
|
|
245
|
0 |
0 |
unless (exists $self->{'http.body'})
|
|
263
|
0 |
5 |
if ($name eq 'Set-Cookie') { }
|
|
298
|
0 |
5 |
if ($cookie)
|
|
303
|
2 |
3 |
if (my $cookies = delete $headers{'Set-Cookie'})
|
|
306
|
3 |
0 |
if (ref $c eq 'HASH') { }
|
|
311
|
0 |
3 |
if (my $domain = $c->{'domain'})
|
|
314
|
2 |
1 |
if (my $expires = $c->{'expires'})
|
|
324
|
1 |
2 |
if ($c->{'secure'})
|
|
327
|
1 |
2 |
if ($c->{'httponly'})
|
|
341
|
1 |
0 |
if (exists $self->{'fd'}) { }
|
|
343
|
0 |
1 |
if utf8::is_utf8($line)
|
|
360
|
0 |
1 |
if ($self->_parsed_cookies)
|