blib/lib/Net/SSH/Perl/WithSocks.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 12 | 0.0 |
line | true | false | branch |
---|---|---|---|
41 | 0 | 0 | if ($params{'SocksHost'}) |
52 | 0 | 0 | unless $ssh->{'WithSocks'} |
55 | 0 | 0 | unless defined $raddr |
58 | 0 | 0 | if ($rport =~ /\D/) |
66 | 0 | 0 | unless my $sock = 'IO::Socket::Socks'->new('ConnectAddr', $raddr, 'ConnectPort', $rport, %{$$ssh{'WithSocks'};}) |
74 | 0 | 0 | unless defined $sock->blocking(0) |