line |
true |
false |
branch |
10
|
2 |
1 |
if (@_ > 1) |
12
|
1 |
1 |
if (grep /^detect_web$/, @_) |
16
|
1 |
1 |
if (grep /^detect_web_fast$/, @_) |
26
|
0 |
13 |
if ($ENV{'MOD_PERL'}) |
28
|
0 |
0 |
if $first |
31
|
0 |
13 |
if ($ENV{'PLACK_ENV'}) |
34
|
0 |
0 |
if $first |
37
|
7 |
6 |
if ($ENV{'PANGEA'}) |
40
|
2 |
5 |
if $first |
43
|
0 |
11 |
if ($ENV{'CPANEL'} or $ENV{'WHM50'}) |
45
|
0 |
0 |
if $first |
48
|
0 |
11 |
if ($ENV{'CATALYST_SCRIPT_GEN'}) |
50
|
0 |
0 |
if $first |
53
|
0 |
11 |
if ($ENV{'DANCER_APPDIR'}) |
55
|
0 |
0 |
if $first |
58
|
0 |
11 |
if ($ENV{'MOJO_EXE'}) |
60
|
0 |
0 |
if $first |
63
|
0 |
11 |
if ($ENV{'FCGI_ROLE'}) |
65
|
0 |
0 |
if $first |
68
|
0 |
11 |
if ($ENV{'INSTANCE_ID'}) |
70
|
0 |
0 |
if $first |
74
|
9 |
2 |
if (defined $ENV{'GATEWAY_INTERFACE'} and $ENV{'GATEWAY_INTERFACE'} =~ /^CGI/) |
76
|
2 |
7 |
if $first |
80
|
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'}) |
82
|
0 |
2 |
if $first |
87
|
2 |
14 |
if ($k =~ /^(?:HTTP|SERVER|REQUEST)_/) |
89
|
0 |
2 |
if $first |
99
|
2 |
7 |
unless %res |