Branch Coverage

blib/lib/Proc/Govern.pm
Criterion Covered Total %
branch 31 132 23.4


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'}
369 0 1 if (ref $_[0]) { }
378 0 1 if (defined $args{'euid'})
380 0 0 unless ($args{'euid'} =~ /\A[0-9]+\z/)
382 0 0 if @pw
384 0 0 unless $args{'euid'} =~ /\A[0-9]+\z/
387 0 1 if (defined $args{'egid'})
389 0 0 unless ($args{'egid'} =~ /\A[0-9]+( [0-9]+)*\z/)
391 0 0 if @gr
393 0 0 unless $args{'egid'} =~ /\A[0-9]+( [0-9]+)*\z/
398 0 1 if $args{'killfam'}
399 0 1 if $args{'no_screensaver'}
400 0 1 if $args{'no_sleep'}
405 0 1 unless defined $cmd
406 0 1 unless ref $cmd eq 'ARRAY'
409 1 0 unless (defined $name)
412 0 1 unless length $name
414 0 1 unless defined $name
415 0 1 unless $name =~ /\A\w+\z/
418 0 1 if ($args{'single_instance'})
421 0 0 if ('Proc::PID::File'->running('dir', $pid_dir, 'name', $name, 'verify', 1))
422 0 0 if ($args{'on_multiple_instance'} and $args{'on_multiple_instance'} eq 'exit') { }
448 1 0 unless $args{'log_stdout'}
457 0 0 if $showout
466 1 0 unless $args{'log_stderr'}
474 0 0 if $showerr
482 1 0 unless $args{'log_combined'}
490 0 0 if $showout
496 0 0 if $showerr
504 1 0 if $showerr
507 0 0 if $showerr
512 1 0 unless $nosleep
514 0 0 unless ($res->[0] == 200)
519 0 0 if ($res->[2])
524 0 0 unless ($res->[0] == 200 or $res->[0] == 304)
533 1 0 unless $prevented_sleep
535 0 0 unless ($res->[0] == 200 or $res->[0] == 304)
550 0 1 if defined $args{'euid'} or defined $args{'egid'}
555 0 1 unless $h = IPC::Run::start($cmd, \*STDIN, $out, $err, $to)
559 0 1 if (defined $args{'nice'})
566 0 1 if defined $args{'euid'} or defined $args{'egid'}
589 0 0 if ($self->{'restart_if_failed'})
594 0 1 if $args{'restart_if_failed'}
602 3 0 if (not $self->{'suspended'}) { }
606 1 2 unless ($h->pumpable)
614 0 2 if $everr and not $everr =~ /^IPC::Run: timeout/
621 0 2 if (defined $args{'timeout'})
622 0 0 if ($now - $start_time >= $args{'timeout'})
632 2 0 unless $args{'restart_if_no_output_after'}
633 0 0 unless $now - $last_out_time >= $args{'restart_if_no_output_after'}
640 0 0 if ($lw and !$lastlw_time || $lastlw_time <= $now - $lwfreq)
642 0 0 if (not $self->{'suspended'}) { }
644 0 0 if (ref $lwhigh eq 'CODE') { }
651 0 0 if ($is_high)
657 0 0 if (ref $lwlow eq 'CODE') { }
664 0 0 if ($is_low)
674 2 0 unless $noss
675 0 0 unless not $noss_lastprevent_time or $noss_lastprevent_time <= $now - $noss_timeout + 10
678 0 0 unless ($noss_lastprevent_time)
680 0 0 unless ($noss_screensaver)
689 0 0 if ($res->[0] != 200)
700 0 0 if ($res->[0] != 200)