| line |
true |
false |
branch |
|
13
|
0 |
1 |
@_ && ref $_[0] ? : |
|
|
1 |
0 |
unless my(%args) = @_ && ref $_[0] ? %{$_[0];} : @_ |
|
15
|
1 |
0 |
unless defined $args{'sleep'} |
|
33
|
0 |
0 |
if ($cmd eq 'start') { } |
|
|
0 |
0 |
elsif ($cmd eq 'stop') { } |
|
|
0 |
0 |
elsif ($cmd eq 'status') { } |
|
|
0 |
0 |
elsif ($cmd eq 'restart') { } |
|
34
|
0 |
0 |
if (my $status = status($args)) |
|
42
|
0 |
0 |
if (status($args)) { } |
|
64
|
0 |
0 |
unless defined $pid |
|
66
|
0 |
0 |
if ($pid) |
|
67
|
0 |
0 |
unless open PID, ">$$args{'pidfile'}" |
|
75
|
0 |
0 |
if -e $$args{'stopfile'} |
|
79
|
0 |
0 |
if ($@) |
|
83
|
0 |
0 |
if $$args{'sleep'} |
|
84
|
0 |
0 |
if (-e $$args{'stopfile'}) |
|
95
|
0 |
0 |
unless open FH, ">$$args{'stopfile'}" |
|
102
|
0 |
0 |
if (-e $$args{'pidfile'}) { } |
|
103
|
0 |
0 |
unless open PID, $$args{'pidfile'} |