| line |
true |
false |
branch |
|
17
|
0 |
54 |
unless my $read_fh = delete $option{'read_fh'} |
|
18
|
0 |
54 |
unless my $write_fh = delete $option{'write_fh'} |
|
24
|
14 |
142 |
unless my $_size = $self->_read(4) |
|
41
|
0 |
159 |
if (not defined $len) { } |
|
|
14 |
145 |
elsif ($len == 0) { } |
|
58
|
0 |
142 |
if (not defined $len) { } |
|
|
0 |
142 |
elsif ($len == 0) { } |
|
84
|
0 |
71 |
unless ($self->is_written) |
|
88
|
0 |
71 |
unless my $read = $self->SUPER::read |
|
93
|
0 |
71 |
if ($self->is_written) |
|
117
|
0 |
372 |
unless ($self->is_written) |
|
124
|
0 |
372 |
if ($self->is_written) |
|
144
|
12 |
17 |
if ($self->no_fork) { } |
|
160
|
0 |
54 |
unless defined $pid |
|
161
|
14 |
40 |
if ($pid == 0) |
|
183
|
384 |
62 |
if $self->no_fork |
|
185
|
6 |
56 |
@_ ? : |
|
186
|
24 |
38 |
if (my(@ready) = grep({$_->{'_written'} == 0;} @pipes)) |
|
195
|
67 |
107 |
if (grep {$pipe->{'read_fh'} == $_;} @ready) |
|
209
|
12 |
2 |
if $self->no_fork |
|
214
|
10 |
0 |
if (delete $self->{'pipes'}{$pid}) { } |