Condition Coverage

blib/lib/Net/SSH/Perl.pm
Criterion Covered Total %
condition 8 75 10.6


and 3 conditions

line !l l&&!r l&&r condition
149 0 0 4 $user and $user eq 'root'
0 0 4 $user and $user eq 'root' and not defined $ssh->{'config'}->get('privileged')
247 0 0 0 $addr and not $p
292 0 0 0 substr($line, 0, 4) eq 'SSH-' and length $line > 255
324 0 0 0 $remote_minor == 99 and $proto & &PROTOCOL_SSH2()
0 0 0 $remote_minor == 99 and $proto & &PROTOCOL_SSH2() and not $proto & &PROTOCOL_SSH1_PREFERRED()
371 0 1 0 not defined $pass and exists $Net::SSH::Perl::CONFIG->{'ssh_password'}
392 0 0 0 @_ and not defined $ssh->{'session'}{'id'}
408 0 0 0 defined $port and $port =~ /\D/
418 0 0 0 defined $status and $status == &HOST_OK() || $status == &HOST_CHANGED()
445 0 0 0 $check_ip and $host =~ /[a-z][A-Z]+/
449 0 0 0 defined $status and $status == &HOST_OK() || $status == &HOST_CHANGED()

or 2 conditions

line l !l condition
123 2 2 delete $arg{'options'} || []
211 0 0 $ssh->{'config'}->get('port') || 'ssh'
214 0 0 $serv[2] || 22
248 0 0 $addr ||= "\000\000\000\000"
251 0 0 getprotobyname 'tcp' || 0
402 0 0 $ssh->{'config'}->get('strict_host_key_checking') || 'no'

or 3 conditions

line l !l&&r !l&&!r condition
117 3 1 0 delete $arg{'user_config'} || catfile($ENV{'HOME'} || $ENV{'USERPROFILE'}, '.ssh', 'config')
120 0 0 4 delete $arg{'sys_config'} || $^O eq 'MSWin32'
254 0 0 0 not $p or bind $sock, sockaddr_in($p, $addr)
287 0 0 0 $!{'EAGAIN'} or $!{'EWOULDBLOCK'}
403 0 0 0 $host ||= $ssh->{'host'}
404 0 0 0 $u_hostfile ||= $ssh->{'config'}->get('user_known_hosts')
405 0 0 0 $s_hostfile ||= $ssh->{'config'}->get('global_known_hosts')
418 0 0 0 $status == &HOST_OK() || $status == &HOST_CHANGED()
449 0 0 0 $status == &HOST_OK() || $status == &HOST_CHANGED()