#!/usr/bin/perl -w
system("ssh adm\@testsrvr /home/adm/teststart");
exit 0;