system("plink $server");
rest of my perl script