| line |
l |
!l&&r |
!l&&!r |
condition |
|
9
|
0 |
0 |
0 |
$p{'cgi'} || 'CGI'->new |
|
41
|
0 |
0 |
0 |
$$self{'the_request'} ||= join(' ', $self->method, $$self{'query'}->query_string ? $self->uri . '?' . $$self{'query'}->query_string : $self->uri, $$self{'query'}->server_protocol) |
|
63
|
0 |
0 |
0 |
$$self{'uri'} ||= $$self{'query'}->script_name . $self->path_info || '' |
|
108
|
0 |
0 |
0 |
$$self{'headers_in'} ||= 'Apache::Table'->new('Authorization', $$self{'query'}->auth_type, 'Content-Length', $ENV{'CONTENT_LENGTH'}, 'Content-Type', $$self{'query'}->can('content_type') ? $$self{'query'}->content_type : $ENV{'CONTENT_TYPE'}, map({my $k = ucfirst lc $_;
$k =~ s/_(.)/-\u$1/g;
$k, $$self{'query'}->http($_);} grep({s/^HTTP_//;} keys %ENV))) |
|
145
|
0 |
0 |
0 |
exists $$h{'Location'} || exists $$e{'Location'} |
|
170
|
0 |
0 |
0 |
$$self{'notes'} ||= 'Apache::Table'->new |
|
193
|
0 |
0 |
0 |
$$self{'subprocess_env'} ||= 'Apache::Table'->new(%ENV) |