http://www.perlmonks.org?node_id=1017086


in reply to hiding Expect output

use Net::OpenSSH;
my $ssh = Net::OpenSSH->new($host,
                            user => $user,
                            password => $password,
                            master_stdout_discard => 1,
                            master_stderr_discard => 1);
$ssh->system;

[download]

In Section Seekers of Perl Wisdom