| line |
true |
false |
branch |
|
77
|
0 |
3 |
unless ($ctrl) |
|
82
|
0 |
3 |
unless ($param{'name'}) |
|
91
|
2 |
1 |
unless (defined $param{'auto'}) |
|
94
|
0 |
3 |
unless ($ctrl->add_proxy($proxy)) |
|
121
|
0 |
0 |
$proxy->is_running ? : |
|
126
|
0 |
0 |
unless $proxy->$_ |
|
171
|
0 |
5 |
unless ($$svc{'proxy'} and $$svc{'proxy'} eq $proxy) |
|
176
|
1 |
4 |
unless ($proxy->is_running) |
|
177
|
1 |
0 |
if ($proxy->auto) { } |
|
208
|
0 |
1 |
unless $proxy->is_running |
|
212
|
0 |
1 |
unless ($hdl) |
|
235
|
0 |
0 |
unless $env |
|
236
|
0 |
0 |
unless ref $env eq 'HASH' |
|
245
|
0 |
0 |
unless my $value = _STRING($_[0]) |
|
276
|
0 |
2 |
ref $_[1] ? : |
|
|
0 |
2 |
unless my $value = ref $_[1] ? _ARRAY($_[1]) : _STRING($_[1]) |
|
283
|
0 |
0 |
unless defined $value |
|
284
|
0 |
0 |
if ($value =~ /^\[/) |
|
296
|
0 |
0 |
unless my $value = _STRING($_[1]) |
|
303
|
0 |
0 |
unless defined $value |
|
313
|
2 |
0 |
defined $value ? : |
|
316
|
0 |
2 |
if (ref $v) |
|
319
|
1 |
1 |
if ($old) { } |
|
320
|
1 |
0 |
defined $old ? : |
|
321
|
0 |
1 |
if ref $oldv |
|
351
|
0 |
0 |
unless my $fh = $socket->fh |
|
379
|
1 |
4 |
unless $proxy->cmd |
|
411
|
1 |
2 |
if (POSIX::WIFEXITED($es) and not POSIX::WEXITSTATUS($es)) { } |
|
|
2 |
0 |
elsif (POSIX::WIFSIGNALED($es) and POSIX::WTERMSIG($es) == 15) { } |
|
440
|
0 |
0 |
if ($fatal) |
|
466
|
3 |
0 |
if (my $pid = $proxy->pid) |
|
478
|
0 |
79 |
unless my $log_fh = $$proxy{'log_fh'} |
|
484
|
0 |
6 |
unless $_ |
|
492
|
0 |
84 |
unless my $status_fh = $$proxy{'status_fh'} |
|
498
|
0 |
8 |
unless $_ |
|
518
|
4 |
4 |
if ($status and $status eq 'started') { } |
|
|
4 |
0 |
elsif ($status and $status eq 'stopped') { } |
|
520
|
0 |
4 |
unless ($pid) |
|
528
|
1 |
3 |
if ($proxy->auto) |
|
530
|
1 |
0 |
unless (@up) |
|
547
|
0 |
6 |
if ($svcname and $svcname eq '-') |
|
553
|
6 |
0 |
unless ($svc) |
|
575
|
0 |
3 |
unless $$proxy{'is_running'} |
|
580
|
0 |
3 |
if ($finally) |