Select Code to Download

# ls ssh-targets:
ssh.pl
box1 -> ssh.pl
box2 -> ssh.pl

#!/usr/bin/perl
my $file=$0;
...

# and ssh to it.
exec("ssh $user\@$dest @ARGV") if $dest;