Branch Coverage

blib/lib/Metabrik/System/Process.pm
Criterion Covered Total %
branch 0 116 0.0


line true false branch
80 0 0 unless $self->brik_help_run_undef_arg("parse_ps_output", $data)
93 0 0 if ($ntoks > $count)
107 0 0 unless my $res = $self->capture("ps awuxw")
116 0 0 unless $self->brik_help_run_undef_arg("is_running", $process)
118 0 0 unless my $list = $self->list
121 0 0 if ($command =~ /^\[.*\]$/) { }
123 0 0 if ($command eq $process)
131 0 0 if ($toks[0] eq $process)
144 0 0 unless $self->brik_help_run_undef_arg("is_running_from_string", $string)
146 0 0 unless my $list = $self->list
149 0 0 if ($command =~ /$string/i)
161 0 0 unless $self->brik_help_run_undef_arg("get_pid_from_string", $string)
163 0 0 unless my $list = $self->list
166 0 0 if ($command =~ /$string/i)
178 0 0 unless $self->brik_help_run_undef_arg("get_pid_list_from_string", $string)
183 0 0 unless my $list = $self->list
186 0 0 if ($command =~ /$string/i)
198 0 0 unless $self->brik_help_run_undef_arg("get_pid_list_from_regex", $regex)
203 0 0 unless my $list = $self->list
206 0 0 if ($command =~ /$regex/i)
218 0 0 unless $self->brik_help_run_undef_arg("get_process_info", $process)
221 0 0 unless my $list = $self->list
223 0 0 unless my $command = $this->{'COMMAND'}
226 0 0 if ($toks[0] eq $process)
238 0 0 unless $self->brik_help_run_undef_arg("kill", $process)
240 0 0 $self->force_kill ? :
242 0 0 if ($process =~ /^\d+$/) { }
247 0 0 unless my $list = $self->get_process_info($process)
272 0 0 if (defined $sub) { }
285 0 0 if ($self->use_pidfile)
286 0 0 unless my $pidfile = $self->get_new_pidfile
304 0 0 unless my $pidfile = $self->get_new_pidfile
308 0 0 if (defined $sub) { }
334 0 0 unless my $ff = "Metabrik::File::Find"->new_from_brik_init($self)
340 0 0 unless my $pid = "Daemon::Daemonize"->read_pidfile($_)
350 0 0 unless my $list = $self->list_daemons
354 0 0 if ($_ > $id)
366 0 0 unless $self->brik_help_run_undef_arg("kill_from_pidfile", $pidfile)
367 0 0 unless $self->brik_help_run_file_not_found("kill_from_pidfile", $pidfile)
369 0 0 if (my $pid = "Daemon::Daemonize"->check_pidfile($pidfile))
382 0 0 unless $self->brik_help_run_undef_arg("is_running_from_pidfile", $pidfile)
385 0 0 unless (-f $pidfile)
389 0 0 if (my $pid = "Daemon::Daemonize"->check_pidfile($pidfile))
403 0 0 unless $self->brik_help_run_undef_arg("grep_by_name", $process_name)
405 0 0 unless my $list = $self->list
407 0 0 if (lc($p->{'COMMAND'}) =~ /$process_name/i)
420 0 0 if (defined $pidfile)
425 0 0 defined $id ? :
436 0 0 if (defined $pidfile)
441 0 0 if (defined $id) { }
457 0 0 unless my $pidfile = $self->get_new_pidfile
462 0 0 unless (defined $r)
476 0 0 unless $self->brik_help_run_undef_arg("delete_pidfile", $pidfile)
478 0 0 unless (-f $pidfile)
484 0 0 unless (defined $r)
499 0 0 unless $self->brik_help_run_undef_arg("wait_pidfile", $pidfile)
504 0 0 if (-e $pidfile)
556 0 0 if (-f $pidfile)