| line |
true |
false |
branch |
|
15
|
0 |
164 |
unless my $read_fh = delete $option{'read_fh'} |
|
16
|
0 |
164 |
unless my $write_fh = delete $option{'write_fh'} |
|
21
|
29 |
404 |
unless my $_size = $self->_read(4) |
|
36
|
0 |
436 |
if (not defined $len) { } |
|
|
29 |
407 |
elsif ($len == 0) { } |
|
52
|
0 |
404 |
if (not defined $len) { } |
|
|
0 |
404 |
elsif ($len == 0) { } |
|
74
|
0 |
292 |
unless ($self->is_written) |
|
78
|
0 |
292 |
unless my $read = $self->SUPER::read |
|
82
|
0 |
292 |
if ($self->is_written) |
|
101
|
0 |
714 |
unless ($self->is_written) |
|
107
|
0 |
714 |
if ($self->is_written) |
|
127
|
24 |
45 |
if ($self->no_fork) { } |
|
142
|
0 |
164 |
unless defined $pid |
|
143
|
29 |
135 |
if ($pid == 0) |
|
163
|
738 |
277 |
if $self->no_fork |
|
165
|
43 |
234 |
@args ? : |
|
166
|
54 |
223 |
if (my(@ready) = grep({$_->{'_written'} == 0;} @pipes)) |
|
172
|
21 |
202 |
if (my $tick = $self->{'option'}{'idle_tick'}) { } |
|
174
|
21 |
14 |
if (my(@r) = $select->can_read($tick)) |
|
186
|
289 |
725 |
if (grep {$pipe->{'read_fh'} == $_;} @ready) |
|
198
|
24 |
15 |
if $self->no_fork |
|
203
|
75 |
0 |
if (delete $self->{'pipes'}{$pid}) { } |