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}) { } |