| line |
true |
false |
branch |
|
18
|
3 |
0 |
if (eval {
do {
require URI::Escape::XS
}
}) { } |
|
57
|
6 |
37 |
if ($argv_ref) { } |
|
63
|
0 |
37 |
if (grep {/\.psgi \z/msx;} @argv) |
|
66
|
0 |
0 |
if $a =~ /\.psgi \z/msx |
|
73
|
4 |
4 |
if ($s =~ s/\A -- //msx) { } |
|
75
|
3 |
1 |
unless (defined $value) |
|
76
|
3 |
0 |
@argv ? : |
|
89
|
3 |
40 |
if (@argv and $argv[0] =~ /\Ahttp/) |
|
93
|
40 |
3 |
unless $uri->scheme |
|
94
|
40 |
3 |
unless $uri->host |
|
133
|
37 |
6 |
if $env{'SCRIPT_NAME'} eq '/' |
|
137
|
43 |
0 |
if (ref $res eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $res eq 'CODE') { } |
|
157
|
40 |
3 |
if ($self->need_headers) |