| line |
true |
false |
branch |
|
22
|
0 |
0 |
unless my $regex = shift()
|
|
23
|
0 |
0 |
unless defined $cache_ts
|
|
25
|
0 |
0 |
if ($time - 5 > $cache_ts)
|
|
29
|
0 |
0 |
unless ($ps_cache)
|
|
46
|
0 |
0 |
if $self->{'debug'} > 5
|
|
48
|
0 |
0 |
unless $state->{'running_progs'}
|
|
50
|
0 |
0 |
unless my $prog = $message->{'runner_program_prog'}
|
|
52
|
0 |
0 |
unless $prog_args
|
|
53
|
0 |
0 |
if not ref $prog_args or ref $prog_args ne 'ARRAY' and ref $prog_args ne 'HASH'
|
|
57
|
0 |
0 |
if (ref $prog_args eq 'HASH')
|
|
67
|
0 |
0 |
unless my $prog_regex = $message->{'runner_process_regex'}
|
|
69
|
0 |
0 |
unless $message->{'runner_return_type'}
|
|
71
|
0 |
0 |
if $return_type ne 'json' and $return_type ne 'gather'
|
|
73
|
0 |
0 |
if ($return_type eq 'gather')
|
|
78
|
0 |
0 |
if ($state->{'running_progs'}{'prog_run_key'} or _is_running($prog_regex))
|
|
108
|
0 |
0 |
if ($return_type eq 'gather')
|
|
118
|
0 |
0 |
if ($return_type eq 'gather')
|
|
130
|
0 |
0 |
unless (defined $child)
|
|
144
|
0 |
0 |
if ($return_type eq 'gather') { }
|
|
|
0 |
0 |
elsif ($return_type eq 'json') { }
|
|
151
|
0 |
0 |
unless defined $child
|