use Net::SSH::Perl;
$host="192.20.15.3";
$user="s00ben";
$pass="*password";
my $ssh = Net::SSH::Perl->new($host);
$ssh->login($user, $pass);
my($stdout, $stderr, $exit) = $ssh->cmd($cmd);