$exp->expect($timeout,
             [ qr/\(yes\/no\)\?/i, sub { my $self = shift;
                                      $self->send("yes\r");   <----unknown host
                                      exp_continue; }],
             [ qr/password: /i, sub { my $self = shift;
                                      $self->send("$password\n"); <------ needs password
                                      exp_continue; }],
             [ qr/#/i, sub { my $self = shift;                 <-------- ready to go.
                                      $self->send("ls\n");
                                      ;
                                       }],

            );