Select Code to Download

SSHProcessError The ssh process was terminated. at line xxx

       my $ssh = Net::SSH::Expect->new (
                host => "$current_server",
...
        # I've tried to capture $@ or $! here but it never gives me an
+ything useful
        ($ssh->read_all(2) =~ />\s*|$\s*\z/) or die "where's the remot
+e prompt?";
        $ssh->exec("stty raw -echo");