> I hope this is an easy one (I have a feeling it is).
> 
> I'm trying to parse through a single, large firewall log file.  I need
> to run through a file to get the firewall name and push the associated
> data to it's own log file.  This is what I have so far:
> 
> 
> #!/usr/bin/perl
> 
> use warnings;
> use strict;
> open CULIST, "/root/syslog_stuff/CULIST3.txt" or die $!;
> 
> open SEPTEMBER, "/var/log/log_netscreen_sep" or die $!;
> 
> while (<CULIST>) {
> my $culist = $_;

It is highly unlikey that the string "SUN9-GT\n" is going to show up inside 
your log file.

  chomp (my $culist = $_);


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to