| line |
true |
false |
branch |
|
18
|
0 |
0 |
unless $$self{'s'} = 'IO::Socket::INET'->new('PeerAddr', "${host}:$port") |
|
22
|
0 |
0 |
if $locker |
|
33
|
0 |
0 |
unless $status |
|
35
|
0 |
0 |
scalar @ret == 0 ? : |
|
43
|
0 |
0 |
unless $status |
|
45
|
0 |
0 |
scalar @ret == 0 ? : |
|
53
|
0 |
0 |
unless $chan |
|
55
|
0 |
0 |
scalar @ret == 0 ? : |
|
64
|
0 |
0 |
scalar @ret == 0 ? : |
|
72
|
0 |
0 |
$chan ? : |
|
77
|
0 |
0 |
$chan ? : |
|
113
|
0 |
0 |
unless $status |
|
115
|
0 |
0 |
scalar @ret == 0 ? : |
|
127
|
0 |
0 |
if (select $rin, undef, undef, 0.05) |
|
129
|
0 |
0 |
if ($buf) |
|
155
|
0 |
0 |
if $cmd |
|
163
|
0 |
0 |
if not $buf or $ret =~ /Ready\n$/ |
|
166
|
0 |
0 |
if ($line =~ /^\+/) { } |
|
|
0 |
0 |
elsif ($line eq 'Ready') { } |