Select Code to Download

perl filename.pl remoteuser remoteserver

#!/usr/bin/perl

...
        "/users/$remoteuser/tmp/rem_snew2.pl" );

}

ping -c 2 remoteserver
ssh remoteuser@remoteserver ls -d tmp