Lines Matching refs:HOST

51       ($HOST,$USER,$PASS,$INSTANCES,$DURATION)=split(/,/,@hosts[$i]);
52       ($SHORTHOST,$TRASH)=split(/\./,$HOST);
60       my $sftp = Net::SFTP->new($HOST,%args);
62       print("$LTPSOURCE copied to $LTPTARGET on $HOST\n");
65       my $ssh = Net::SSH::Perl->new($HOST);
68       print("Untar and build testcases on $HOST\n");
70           print("Error untarring or building on $HOST. Giving up on this machine.\n");
74           print("Untar and build complete on $HOST\n");
77       print("Starting sar on $HOST\n");
80       print("Cranking up tests on " . $HOST . "\n");
82           print("Error starting tests on $HOST. Giving up on this machine.\n");
86           print("Tests completed on $HOST\n");
97           print("Stopped sar on $HOST\n");
102 …      print("Error returned $tmp tarring up results on $HOST. Some of the logs may be missing.\n");
105           print("Results tarred up on $HOST\n");
109       print("Uploading results, $LTP_LOGS, to $LTPRESULTS for $HOST\n");
111           print("Error uploading results from " . $HOST . ". Giving up on this machine.\n");
115           print("Results uploaded for $HOST\n");