| line |
true |
false |
branch |
|
20
|
0 |
8 |
unless (defined $request_pause) |
|
25
|
0 |
8 |
unless my $d = "HTTP::Daemon"->new |
|
28
|
8 |
0 |
if ($d->sockdomain == 2) { } |
|
|
0 |
0 |
elsif ($d->sockdomain == 10) { } |
|
38
|
8 |
0 |
if ($url_filename) { } |
|
39
|
0 |
8 |
unless open $fh, ">", $url_filename |
|
45
|
0 |
8 |
unless $url_filename |
|
49
|
0 |
8 |
if ($filename) |
|
50
|
0 |
0 |
unless open DATA, "< $filename" |
|
62
|
0 |
70 |
if $ENV{'TEST_HTTP_VERBOSE'} |
|
65
|
8 |
0 |
eval {
do {
'CGI'->can('multi_param')
}
} ? : |
|
74
|
1 |
3 |
defined $q->param('query') ? : |
|
75
|
0 |
4 |
defined $q->param('botcheck_query') ? : |
|
76
|
0 |
4 |
defined $q->param('query2') ? : |
|
77
|
0 |
4 |
defined $q->param('session') ? : |
|
79
|
0 |
4 |
@cats ? : |
|
80
|
8 |
4 |
$cat{$_} ? : |
|
108
|
0 |
16 |
if ($location =~ m[^/link/([^/]+)/(.*)$]) |
|
112
|
2 |
14 |
if ($location eq '/get_server_log') { } |
|
|
8 |
6 |
elsif ($location eq '/quit_server') { } |
|
120
|
0 |
6 |
if $expression |
|
122
|
0 |
6 |
if $@ |
|
124
|
0 |
6 |
if ($location =~ m[^/redirect/(.*)$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/local/(.*)$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/download/([\w.-]+)$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/error/notfound/(.*)$] or $location =~ m[^/favicon.ico]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/error/timeout/(\d+)$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/error/close/(\d+)$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/chunks]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/error/after_headers$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/large/bzip/16M$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/large/gzip/16M$]) { } |
|
|
0 |
6 |
elsif ($location =~ m[^/content/(.*)$]) { } |
|
|
3 |
3 |
elsif ($location =~ m[^/basic_auth/([^/]+)/([^/]+)$]) { } |
|
164
|
0 |
0 |
if $count-- > 0 |
|
173
|
0 |
0 |
if $count-- > 0 |
|
228
|
1 |
2 |
if ($user eq $ex_user and $pass eq $ex_pass) { } |
|
243
|
16 |
0 |
if $res |
|
246
|
16 |
0 |
if $res |
|
249
|
0 |
16 |
if (my $err = $@) |
|
251
|
0 |
0 |
unless ($err =~ /^Planned error\b/) |
|
256
|
0 |
16 |
unless ($res) |
|
259
|
8 |
8 |
if $quitserver |
|
264
|
8 |
8 |
if $quitserver |