| line |
true |
false |
branch |
|
71
|
0 |
0 |
if (grep {$_ eq "_$a";} @props) { } |
|
72
|
0 |
0 |
$a eq 'services' ? : |
|
|
0 |
0 |
unless ($obj->property("_$a", $a eq 'services' ? %{$args{$a};} : $args{$a})) |
|
119
|
0 |
0 |
if (defined $client) |
|
144
|
0 |
0 |
defined $status ? : |
|
150
|
0 |
0 |
unless defined $status |
|
182
|
0 |
0 |
if $obj->property('_options_ttl') |
|
208
|
0 |
0 |
if (exists $services{$service}) { } |
|
210
|
0 |
0 |
if ($method eq 'OPTIONS' or $services{$service} eq $method) { } |
|
211
|
0 |
0 |
if ($method eq 'REQMOD' and defined $reqmod) { } |
|
|
0 |
0 |
elsif ($method eq 'RESPMOD' and defined $respmod) { } |
|
|
0 |
0 |
elsif ($method eq 'OPTIONS') { } |
|
235
|
0 |
0 |
if defined $logger |
|
266
|
0 |
0 |
if ($req->parse($client)) { } |
|
270
|
0 |
0 |
if ($obj->_dispatch($client, $req)) { } |
|
271
|
0 |
0 |
if defined $c and $c eq 'close' |
|
281
|
0 |
0 |
if defined $logger |
|
314
|
0 |
0 |
$addr eq '0.0.0.0' ? : |
|
322
|
0 |
0 |
if (defined $socket) { } |
|
325
|
0 |
0 |
if (defined($cpid = pfork)) { } |
|
326
|
0 |
0 |
unless ($cpid) |