line |
!l |
l&&!r |
l&&r |
condition |
147
|
0 |
0 |
5 |
$user and $user eq "root" |
|
0 |
0 |
5 |
$user and $user eq "root" and not defined $ssh->{'config'}->get("privileged") |
245
|
0 |
0 |
0 |
$addr and not $p |
290
|
0 |
0 |
0 |
substr($line, 0, 4) eq "SSH-" and length $line > 255 |
322
|
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() |
369
|
0 |
1 |
0 |
not defined $pass and exists $Net::SSH::Perl::CONFIG->{'ssh_password'} |
390
|
0 |
0 |
0 |
@_ and not defined $ssh->{'session'}{'id'} |
406
|
0 |
0 |
0 |
defined $port and $port =~ /\D/ |
416
|
0 |
0 |
0 |
defined $status and $status == &HOST_OK() || $status == &HOST_CHANGED() |
443
|
0 |
0 |
0 |
$check_ip and $host =~ /[a-z][A-Z]+/ |
447
|
0 |
0 |
0 |
defined $status and $status == &HOST_OK() || $status == &HOST_CHANGED() |
line |
l |
!l&&r |
!l&&!r |
condition |
115
|
3 |
2 |
0 |
delete $arg{'user_config'} || catfile($ENV{'HOME'} || $ENV{'USERPROFILE'}, '.ssh', 'config') |
118
|
0 |
0 |
5 |
delete $arg{'sys_config'} || $^O eq 'MSWin32' |
252
|
0 |
0 |
0 |
not $p or bind $sock, sockaddr_in($p, $addr) |
285
|
0 |
0 |
0 |
$!{'EAGAIN'} or $!{'EWOULDBLOCK'} |
401
|
0 |
0 |
0 |
$host ||= $ssh->{'host'} |
402
|
0 |
0 |
0 |
$u_hostfile ||= $ssh->{'config'}->get("user_known_hosts") |
403
|
0 |
0 |
0 |
$s_hostfile ||= $ssh->{'config'}->get("global_known_hosts") |
416
|
0 |
0 |
0 |
$status == &HOST_OK() || $status == &HOST_CHANGED() |
447
|
0 |
0 |
0 |
$status == &HOST_OK() || $status == &HOST_CHANGED() |