line |
true |
false |
branch |
9
|
2 |
1 |
if (@_ > 1) |
11
|
1 |
1 |
if (grep /^detect_web$/, @_) |
15
|
1 |
1 |
if (grep /^detect_web_fast$/, @_) |
25
|
0 |
13 |
if ($ENV{'MOD_PERL'}) |
27
|
0 |
0 |
if $first |
30
|
0 |
13 |
if ($ENV{'PLACK_ENV'}) |
33
|
0 |
0 |
if $first |
36
|
7 |
6 |
if ($ENV{'PANGEA'}) |
39
|
2 |
5 |
if $first |
42
|
0 |
11 |
if ($ENV{'CPANEL'} or $ENV{'WHM50'}) |
44
|
0 |
0 |
if $first |
47
|
0 |
11 |
if ($ENV{'CATALYST_SCRIPT_GEN'}) |
49
|
0 |
0 |
if $first |
52
|
0 |
11 |
if ($ENV{'DANCER_APPDIR'}) |
54
|
0 |
0 |
if $first |
57
|
0 |
11 |
if ($ENV{'MOJO_EXE'}) |
59
|
0 |
0 |
if $first |
62
|
0 |
11 |
if ($ENV{'FCGI_ROLE'}) |
64
|
0 |
0 |
if $first |
67
|
0 |
11 |
if ($ENV{'INSTANCE_ID'}) |
69
|
0 |
0 |
if $first |
73
|
9 |
2 |
if (defined $ENV{'GATEWAY_INTERFACE'} and $ENV{'GATEWAY_INTERFACE'} =~ /^CGI/) |
75
|
2 |
7 |
if $first |
79
|
0 |
7 |
if ($ENV{'SCRIPT_NAME'} or $ENV{'SCRIPT_FILENAME'} or $ENV{'REMOTE_ADDR'} or $ENV{'HTTPS'} or $ENV{'QUERY_STRING'} or $ENV{'DOCUMENT_ROOT'}) |
81
|
0 |
2 |
if $first |
86
|
2 |
14 |
if ($k =~ /^(?:HTTP|SERVER|REQUEST)_/) |
88
|
0 |
2 |
if $first |
98
|
2 |
7 |
unless %res |