Branch Coverage

lib/Remote/Perl/Transport.pm
Criterion Covered Total %
branch 23 38 60.5


line true false branch
36 0 1522 unless pipe my $child_in_r, my $child_in_w
37 0 1522 unless pipe my $child_out_r, my $child_out_w
38 0 1522 unless pipe my $child_err_r, my $child_err_w
42 99 1423 if ($pid == 0)
50 0 99 unless &Remote::Perl::Transport::open("STDIN", "<&", $child_in_r)
51 0 99 unless &Remote::Perl::Transport::open("STDOUT", ">&", $child_out_w)
52 0 99 unless &Remote::Perl::Transport::open("STDERR", ">&", $child_err_w)
55 0 0 unless exec @{$self->{'cmd'};}
78 0 8965 unless defined $n
89 0 8187 unless defined $n
90 1 8186 if $n == 0
97 0 1 unless $self->stderr_ready(0)
100 0 1 unless defined $n
101 0 1 if $n == 0
116 1422 0 if ($self->{'in_fh'})
124 0 1423 unless $self->{'pid'}
131 1423 4325 if ($result == $pid)
144 1 1399 if ($self->{'in_fh'})
148 1 1399 if $self->{'pid'}