I am trying to write a perl program but I keep getting errors and I was wondering if you can give me some pointers that might help. The program is supposed to read from a file which has a list of server names then put this names in an array. I then used a foreach loop that is supposed to read each server name and execute this command: uname -r remsh $server. This command is supposed to go to each server and then print out the version of each server but this is the part of the program that I keep getting errors on. This is the complete program that I have so far:
#!/usr/local/bin/perl print "\n"; $data_file="testserv.txt"; open(DAT, $data_file) || die("Could not open file!"); @raw_data=<DAT>; close(DAT); print "\n"; foreach $server (@raw_data){ remsh $server uname -r;} Please let me know what is the best way to go from server to server and obtain the necessary information in a perl program. Thanks a lot !!!!! Selenis B. Leguisamon Systems Management Integration Professional IBM Global Services Work: 908-231-4375 E-mail: [EMAIL PROTECTED]