my $ssh = Net::SSH::Perl->new("some_unixhost");

$ssh->login("user", "password");

my ( $out, $err ) = $ssh->cmd("exit");