| line |
true |
false |
branch |
|
17
|
0 |
164 |
unless my $read_fh = delete $option{'read_fh'} |
|
18
|
0 |
164 |
unless my $write_fh = delete $option{'write_fh'} |
|
24
|
29 |
404 |
unless my $_size = $self->_read(4) |
|
41
|
0 |
436 |
if (not defined $len) { } |
|
|
29 |
407 |
elsif ($len == 0) { } |
|
58
|
0 |
404 |
if (not defined $len) { } |
|
|
0 |
404 |
elsif ($len == 0) { } |
|
84
|
0 |
292 |
unless ($self->is_written) |
|
88
|
0 |
292 |
unless my $read = $self->SUPER::read |
|
93
|
0 |
292 |
if ($self->is_written) |
|
117
|
0 |
714 |
unless ($self->is_written) |
|
124
|
0 |
714 |
if ($self->is_written) |
|
145
|
24 |
45 |
if ($self->no_fork) { } |
|
161
|
0 |
164 |
unless defined $pid |
|
162
|
29 |
135 |
if ($pid == 0) |
|
184
|
738 |
293 |
if $self->no_fork |
|
186
|
47 |
246 |
@_ ? : |
|
187
|
59 |
234 |
if (my(@ready) = grep({$_->{'_written'} == 0;} @pipes)) |
|
193
|
15 |
219 |
if (my $tick = $self->{'option'}{'idle_tick'}) { } |
|
195
|
15 |
14 |
if (my(@r) = $select->can_read($tick)) |
|
206
|
288 |
783 |
if (grep {$pipe->{'read_fh'} == $_;} @ready) |
|
220
|
24 |
15 |
if $self->no_fork |
|
225
|
75 |
0 |
if (delete $self->{'pipes'}{$pid}) { } |