my @hosts=( list of hosts here );

for (@hosts) {
    print "Running on $_...\n";
    print `scp script.pl $_:~/`;
    print `ssh $_ "nohup nice perl script.pl &"`;
}

##</code><code>##

print `ssh $_ "nohup nice perl script.pl < /dev/null > /dev/null 2>&1 &"`;