Branch Coverage

blib/lib/Net/SSH/Perl/WithSocks.pm
Criterion Covered Total %
branch 0 12 0.0


line true false branch
45 0 0 if ($params{'SocksHost'})
56 0 0 unless $ssh->{'WithSocks'}
59 0 0 unless defined $raddr
62 0 0 if ($rport =~ /\D/)
70 0 0 unless my $sock = 'IO::Socket::Socks'->new('ConnectAddr', $raddr, 'ConnectPort', $rport, %{$$ssh{'WithSocks'};})
78 0 0 unless defined $sock->blocking(0)