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