Branch Coverage

blib/lib/App/ReslirpTunnel/Butler.pm
Criterion Covered Total %
branch 0 26 0.0


line true false branch
36 0 0 unless defined $arg
45 0 0 unless socketpair my $parent_socket, my $child_socket, 1, 1, 0
49 0 0 if (defined $pid and $pid == 0) { }
0 0 elsif (not defined $pid) { }
51 0 0 unless POSIX::dup2(fileno $child_socket, 1)
58 0 0 unless ($self->{'log_to_stderr'})
65 0 0 unless exec {$sudo_cmd[0];} @sudo_cmd
77 0 0 if ($out_pid == -1) { }
0 0 elsif ($?) { }
96 0 0 if ($r->{'status'} eq "bye")
108 0 0 if ($r->{'status'} ne $expected_status)
119 0 0 unless ($r->{'fd_follows'})
126 0 0 unless my $tap_fh = "IO::Socket::UNIX"->new_from_fd($fd, "r+")