| line |
true |
false |
branch |
|
53
|
0 |
2 |
if ($p{'timeout'} and not $p{'Timeout'}) |
|
58
|
0 |
2 |
unless $$self{'_sock'} = 'IO::Socket::INET'->new(%p) |
|
61
|
0 |
2 |
unless $$self{'_select'} = 'IO::Select'->new($$self{'_sock'}) |
|
89
|
0 |
1 |
if ($$self{'timeout'}) |
|
91
|
0 |
0 |
unless $$self{'_select'}->can_read($$self{'timeout'}) |
|
94
|
0 |
1 |
unless my $rb = $$self{'_sock'}->sysread($moredata, $bytesleft) |
|
109
|
0 |
2 |
unless defined(my $data = <$fh>) |
|
119
|
1 |
1 |
if (ref_tainted(\$wb)) |
|
120
|
0 |
1 |
if ($$self{'timeout'}) |
|
122
|
0 |
0 |
unless $$self{'_select'}->can_write($$self{'timeout'}) |