Как сделать ssh коннект на перл имея переменные
$ip
$user
$passwd
   

http://search.cpan.org/search?query=SSH&mode=all 

#!/usr/bin/perl
# Perl login shell for use with SSH only
# © Jesper Noehr <[email protected]>
#
use strict;
use vars qw($username $sshbinpath $hostname $sshconn);

$username = getpwuid($<);
$sshbinpath = "/usr/bin/ssh";
$hostname = `hostname`; 
chomp($hostname);

if (!-x $sshbinpath) {
    print "SSH Binary not found on system!";
    exit 255;
}
print "Welcome to ".$hostname.", ".$username.".\n";
print "You are restricted to use ".$sshbinpath." only.\n";

for(;;) {
    print "SSH connection (format user\@hostname): ";
    $sshconn = <STDIN>; chomp($sshconn);
    system($sshbinpath." ".$sshconn) if $sshconn =~ /^.+\@.+$/;
}
exit 255