Branch Coverage

lib/ControlFreak.pm
Criterion Covered Total %
branch 19 60 31.6


line true false branch
89 0 14 if defined $param{'log_config_file'} and $home
131 0 9 unless my($svcname) = shift()
143 0 1 unless my($proxyname) = shift()
190 1 3 if $$ctrl{'socketmap'}{$name}
225 0 3 if $$ctrl{'proxymap'}{$name}
268 12 23 if $svc
275 1 22 unless $svc
292 0 0 if $sock
298 0 0 unless $sock
315 1 1 if $proxy
321 0 1 unless $proxy
368 0 2 unless my $args = _ARRAY($param{'args'})
372 0 2 if ($selector eq 'service') { }
1 1 elsif ($selector eq 'tag') { }
1 0 elsif ($selector eq 'all') { }
373 0 0 unless (scalar @$args == 1)
379 0 0 $svc ? :
416 0 0 unless (@svcs)
439 0 0 unless ($proxy)
457 0 0 unless ($proxy)
480 0 0 unless @$args
503 1 0 unless @$args
520 0 0 unless @$args
526 0 0 if $seen{$svcname}++
528 0 0 if (my $proxy = $_->proxy)
530 0 0 if $ppid
558 0 0 unless ($sock)
594 0 0 if (keys %errors) { }
615 0 0 unless $svc->is_down
616 0 0 if ($svc->is_backoff)