Perl shell to automate SSH login