Branch Coverage

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)