=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libnet-openssh-perl-0.80/lib/Net/OpenSSH/ConnectionCache.pm-69- my $ssh = Net::OpenSSH->new($host); libnet-openssh-perl-0.80/lib/Net/OpenSSH/ConnectionCache.pm:70: $ssh->system("$cmd $_"); libnet-openssh-perl-0.80/lib/Net/OpenSSH/ConnectionCache.pm-71- } ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3094- libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:3095: $ssh->system({stdin_file => ['-|', 'gzip -c -d file.gz']}, $rcmd); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3096- ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3205- libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:3206: $ssh->system({remote_shell => 'MSWin'}, echo => $line); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:3207: $ssh->system({remote_shell => 'MSCmd,MSWin'}, type => $file); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3208- ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3806- my $quoted_args = Net::OpenSSH->shell_quote(@args); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:3807: system('ssh', '--', $host, $quoted_args); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-3808- ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-4065- # expand remote shell variables and glob in the same command: libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:4066: $ssh->system('tar', 'czf', \\'$HOME/out.tgz', \'/var/log/server.*.log'); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-4067- ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-4367- my $out = $ssh->capture($cmd1); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:4368: $ssh->system({stdout_discard => 1}, $cmd2); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:4369: $ssh->system({stdout_to_file => '/tmp/output'}, $cmd3); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-4370- ############################################## libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-5002- libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm:5003: $ssh->system("nohup $long_running_command &"); libnet-openssh-perl-0.80/lib/Net/OpenSSH.pm-5004- ############################################## libnet-openssh-perl-0.80/t/common.pm-89-sub dump_open_fds { libnet-openssh-perl-0.80/t/common.pm:90: my @ls = map { `ls -l /proc/$$/fd/$_ 2>&1` } @last_open_fds; libnet-openssh-perl-0.80/t/common.pm-91- join('', "Currently open flle descriptors:\n", @ls); ############################################## libnet-openssh-perl-0.80/t/quoting.t-96- if ($shell =~ /ksh/) { libnet-openssh-perl-0.80/t/quoting.t:97: my $version = `$shell --version 2>&1 </dev/null`; libnet-openssh-perl-0.80/t/quoting.t-98- $version =~ /version\s+sh\s+\(AT\&T\s+Research\)/ ############################################## libnet-openssh-perl-0.80/t/1_run.t-138- libnet-openssh-perl-0.80/t/1_run.t:139:my @ls_good= sort `$LS $sq_cwd`; libnet-openssh-perl-0.80/t/1_run.t-140-my @ls = sort $ssh->capture({stderr_to_stdout => 1}, "$LS $sq_cwd"); ############################################## libnet-openssh-perl-0.80/t/1_run.t-151-print $in $_ for @lines; libnet-openssh-perl-0.80/t/1_run.t:152:my @ps = `$PS_P $pid`; libnet-openssh-perl-0.80/t/1_run.t-153-ok(grep(/ssh/i, @ps)); libnet-openssh-perl-0.80/t/1_run.t-154-ok(close $in); libnet-openssh-perl-0.80/t/1_run.t:155:@ps = `$PS_P $pid`; libnet-openssh-perl-0.80/t/1_run.t-156-ok(!grep(/ssh/i, @ps), "pipe_in SSH proccess is reaped on close");