#define password prompt recognition my $password_prompt=qr/[Pp]assword.*?:|[Pp]assphrase.*?:|[Pp]asswort.*?:/; ##logging on to SSH my $login_output = $ssh->login([$password_prompt]); print "...Login output start...\n"; chomp($login_output); print $login_output; print "\n"; print "...Login output end...\n";