| line |
true |
false |
branch |
|
36
|
0 |
0 |
@_ == 1 ? : |
|
38
|
0 |
0 |
if $singleton++ |
|
44
|
0 |
0 |
ref $_[0] eq 'ARRAY' ? : |
|
65
|
0 |
0 |
if keys %$args |
|
76
|
0 |
0 |
if (UNIVERSAL::isa($config, 'IO::Socket')) { } |
|
|
0 |
0 |
elsif (not UNIVERSAL::isa($config, 'HASH')) { } |
|
93
|
0 |
0 |
unless defined $socket |
|
109
|
0 |
0 |
if (exists $$config{'server_id'}) { } |
|
117
|
0 |
0 |
if defined $id |
|
120
|
0 |
0 |
unless $HTTP::Server::Multiplex::EUID != 0 or defined $$config{'user'} |
|
124
|
0 |
0 |
$user =~ /\D/ ? : |
|
125
|
0 |
0 |
unless defined $uid |
|
132
|
0 |
0 |
$group =~ /\D/ ? : |
|
133
|
0 |
0 |
unless defined $gid |
|
147
|
0 |
0 |
if ($uid ne $HTTP::Server::Multiplex::EUID) |
|
148
|
0 |
0 |
unless setuid($uid) |
|
152
|
0 |
0 |
if ($gid ne $HTTP::Server::Multiplex::EGID) |
|
153
|
0 |
0 |
unless setgid($gid) |
|
158
|
0 |
0 |
unless $$self{'HSM_detach'} |
|
162
|
0 |
0 |
if (defined $pidfile) |
|
163
|
0 |
0 |
unless sysopen PID, $pidfile, 705 |
|
177
|
0 |
0 |
unless sigprocmask(0, $sigset) |
|
181
|
0 |
0 |
unless defined $pid |
|
184
|
0 |
0 |
unless sigprocmask(1, $sigset) |
|
187
|
0 |
0 |
if ($pid > 0) |
|
189
|
0 |
0 |
if ($pidfile) |
|
191
|
0 |
0 |
unless close PID |
|
198
|
0 |
0 |
if $pidfile |
|
214
|
0 |
0 |
unless (keys %{$$self{'HSM_vhosts'};}) |
|
231
|
0 |
0 |
@_ == 1 ? : |
|
233
|
0 |
0 |
if (UNIVERSAL::isa($config, 'HTTP::Server::VirtualHost')) { } |
|
|
0 |
0 |
elsif (not ref $config and $config =~ /\:\:/) { } |
|
|
0 |
0 |
elsif (not UNIVERSAL::isa($config, 'HASH')) { } |
|
238
|
0 |
0 |
if $@ |
|
256
|
0 |
0 |
UNIVERSAL::isa($id, 'HTTP::Server::VirtualHost') ? : |
|
258
|
0 |
0 |
unless defined $vhost |