my $h = start ['bash'], '<pty<', \$in, '>pty>', \$outAndErr, timeout(15);
    pump $h until $outAndErr =~ /$prompt/;
    $outAndErr='';
    $in .= "ssh user\@host\n";
    pump $h until $outAndErr =~ /password:/;
    $outAndErr='';
    $in .= "password\n";
    pump $h until $outAndErr =~ /$remotePrompt/;
    $outAndErr='';
    # You're in - do your stuff