Agilent Technologies 8714ET Switch User Manual


 
6-30 LAN Interface Supplement
Controlling the Analyzer via the LAN
Controlling Multiple Analyzers using a Perl Script
# Append it to a file named data.IP_addr giving
# each analyzer its own data file.
#
$file = "./data.$IP_addr";
# print "Routing input to $file.\n";
open(FILE_OUT, ">> $file") || die "Cannot open $file: $!";
print FILE_OUT $Date;
while (<NEW_SOCK>) {
print FILE_OUT "$_";
}
close(NEW_SOCK);
close(FILE_OUT);
# Tell the instrument's IBASIC program to continue
system("lanio $IP_addr 'PROGram:STATe CONT'");
}
exit 0;