RE: [Perl-unix-users] Script Help Please

2001-11-26 Thread Steve Aaron
Title: RE: [Perl-unix-users] Script Help Please Craig,     this seems to work okay. I made a few amendments but only to add warnings and use strict. Its easier to debug typos, bad initializations etc. with warning and strict set. Give this ago #!/usr/bin

RE: [Perl-unix-users] Script Help Please

2001-11-26 Thread Craig Sharp
e Aaron -Original Message- From: Craig Sharp [mailto:[EMAIL PROTECTED]] Sent: Monday, November 26, 2001 12:45 PM To: [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject: [Perl-unix-users] Script Help Please Hi all, I am lost. I have the foll

RE: [Perl-unix-users] Script Help Please

2001-11-26 Thread Steve Aaron
Title: RE: [Perl-unix-users] Script Help Please Try if (/\bUP\b/ && /$server_name/) You are not matching on $server_name as $server_name is not enclosed by the match operator. You could easily put this in a single regular expression if the position of $server

[Perl-unix-users] Script Help Please

2001-11-26 Thread Craig Sharp
Hi all, I am lost. I have the following script that opens the log file WUGEvent.log and looks for the statment "UP", replaces spaces and writes out the new log file. It works great! Here is the problem. I need to read in another file (wuglist.txt) containing a list of server names