| line |
true |
false |
branch |
|
20
|
0 |
3 |
if (my $v = delete $_{'on_error'})
|
|
22
|
0 |
0 |
unless grep {$_ eq $v;} 'croak', 'return'
|
|
27
|
3 |
0 |
if ($v = delete $_{'server'}) { }
|
|
28
|
0 |
3 |
if (ref $v eq 'ARRAY') { }
|
|
37
|
3 |
0 |
if (my(@select) = grep({-x $_->[0];} map({[shellwords($_)];} @servlist))) { }
|
|
|
0 |
0 |
elsif ($self->{'on_error'} eq 'return') { }
|
|
48
|
0 |
3 |
if keys %_
|
|
50
|
1 |
2 |
if ($envfile)
|
|
51
|
0 |
1 |
unless (-f $envfile)
|
|
52
|
0 |
0 |
if ($self->{'on_error'} eq 'return') { }
|
|
60
|
0 |
1 |
unless (-r $envfile)
|
|
61
|
0 |
0 |
if ($self->{'on_error'} eq 'return') { }
|
|
73
|
0 |
1 |
if ($@) { }
|
|
|
0 |
1 |
elsif ($env->status) { }
|
|
74
|
0 |
0 |
if ($self->{'on_error'} eq 'return') { }
|
|
82
|
0 |
0 |
if ($self->{'on_error'} eq 'return') { }
|
|
95
|
3 |
0 |
unless $self->status
|
|
96
|
3 |
0 |
unless $self->status
|
|
112
|
2 |
4 |
if $self->{'environ'}
|
|
113
|
6 |
0 |
if (my $pid = open3($nullin, $out, $err, $self->server_command, @opt))
|
|
117
|
0 |
94 |
unless &{$cb;}($_)
|
|
120
|
6 |
0 |
if ($self->{'on_error'} eq 'croak') { }
|
|
|
0 |
0 |
elsif ($?) { }
|
|
121
|
0 |
6 |
if ($? == -1) { }
|
|
|
0 |
6 |
elsif ($? & 127) { }
|
|
|
0 |
6 |
elsif (my $code = $? >> 8) { }
|
|
124
|
0 |
0 |
$? & 128 ? :
|
|
145
|
22 |
3 |
if ($arg =~ s/^"(.*?)"$/$1/)
|
|
155
|
3 |
76 |
if (m[^Server version:\s+(.+?)/(\S+)\s+\((.*?)\)]) { }
|
|
|
3 |
73 |
elsif (/^Server built:\s+(.+)/) { }
|
|
|
3 |
70 |
elsif (/^Server loaded:\s+(.+)$/) { }
|
|
|
3 |
67 |
elsif (/^Compiled using:\s+(.+)$/) { }
|
|
|
3 |
64 |
elsif (/^Architecture:\s+(.+)$/) { }
|
|
|
3 |
61 |
elsif (/^Server MPM:\s+(.+)$/) { }
|
|
|
3 |
58 |
elsif (/^\s+threaded:\s+(?<b>yes|no)/) { }
|
|
|
3 |
55 |
elsif (/^\s+forked:\s+(?<b>yes|no)/) { }
|
|
|
25 |
30 |
elsif (/^\s+-D\s+(?<name>.+?)=(?<val>.+)$/) { }
|
|
|
24 |
6 |
elsif (/^\s+-D\s+(?<name>\S+)(?:\s*(?<com>.+))?$/) { }
|
|
212
|
0 |
0 |
if ($conf and not 'File::Spec'->file_name_is_absolute($conf))
|
|
220
|
5 |
1 |
if (@_)
|
|
351
|
2 |
1 |
if (@_)
|
|
362
|
6 |
6 |
if (/^\s*(\S+\.c)$/ and exists $modlist{$1})
|