Branch Coverage

blib/lib/Proc/Govern.pm
Criterion Covered Total %
branch 30 126 23.8


line true false branch
31 0 0 if (@{$h->{'KIDS'};})
33 0 0 if ($self->{'args'}{'killfam'}) { }
48 0 0 if (@{$h->{'KIDS'};})
50 0 0 if ($self->{'args'}{'killfam'}) { }
64 0 0 if $self->{'suspended'}
324 0 1 if (ref $_[0]) { }
333 0 1 if (defined $args{'euid'})
335 0 0 unless ($args{'euid'} =~ /\A[0-9]+\z/)
337 0 0 if @pw
339 0 0 unless $args{'euid'} =~ /\A[0-9]+\z/
342 0 1 if (defined $args{'egid'})
344 0 0 unless ($args{'egid'} =~ /\A[0-9]+( [0-9]+)*\z/)
346 0 0 if @gr
348 0 0 unless $args{'egid'} =~ /\A[0-9]+( [0-9]+)*\z/
353 0 1 if $args{'killfam'}
354 0 1 if $args{'no_screensaver'}
355 0 1 if $args{'no_sleep'}
360 0 1 unless defined $cmd
361 0 1 unless ref $cmd eq 'ARRAY'
364 1 0 unless (defined $name)
367 0 1 unless length $name
369 0 1 unless defined $name
370 0 1 unless $name =~ /\A\w+\z/
373 0 1 if ($args{'single_instance'})
376 0 0 if ('Proc::PID::File'->running('dir', $pid_dir, 'name', $name, 'verify', 1))
377 0 0 if ($args{'on_multiple_instance'} and $args{'on_multiple_instance'} eq 'exit') { }
403 0 1 if ($args{'log_stdout'}) { }
411 0 0 if $showout
419 1 0 if $showout
426 0 1 if ($args{'log_stderr'}) { }
433 0 0 if $showerr
440 0 0 if $showerr
447 1 0 unless $nosleep
449 0 0 unless ($res->[0] == 200)
454 0 0 if ($res->[2])
459 0 0 unless ($res->[0] == 200 or $res->[0] == 304)
468 1 0 unless $prevented_sleep
470 0 0 unless ($res->[0] == 200 or $res->[0] == 304)
485 0 1 if defined $args{'euid'} or defined $args{'egid'}
490 0 1 unless $h = IPC::Run::start($cmd, \*STDIN, $out, $err, $to)
494 0 1 if (defined $args{'nice'})
501 0 1 if defined $args{'euid'} or defined $args{'egid'}
524 0 0 if ($self->{'restart_if_failed'})
529 0 1 if $args{'restart_if_failed'}
537 3 0 if (not $self->{'suspended'}) { }
541 1 2 unless ($h->pumpable)
549 0 2 if $everr and not $everr =~ /^IPC::Run: timeout/
556 0 2 if (defined $args{'timeout'})
557 0 0 if ($now - $start_time >= $args{'timeout'})
567 2 0 unless $args{'restart_if_no_output_after'}
568 0 0 unless $now - $last_out_time >= $args{'restart_if_no_output_after'}
575 0 0 if ($lw and !$lastlw_time || $lastlw_time <= $now - $lwfreq)
577 0 0 if (not $self->{'suspended'}) { }
579 0 0 if (ref $lwhigh eq 'CODE') { }
586 0 0 if ($is_high)
592 0 0 if (ref $lwlow eq 'CODE') { }
599 0 0 if ($is_low)
609 2 0 unless $noss
610 0 0 unless not $noss_lastprevent_time or $noss_lastprevent_time <= $now - $noss_timeout + 10
613 0 0 unless ($noss_lastprevent_time)
615 0 0 unless ($noss_screensaver)
624 0 0 if ($res->[0] != 200)
635 0 0 if ($res->[0] != 200)