Re: Variable problem inside an array

You probably want something like this (UNTESTED):

my $filter = '/var/tmp/messages_filter';

open FILE, '<', $filter or error();

my $grepstring = join '|', map { chomp; $_ } <FILE>
    or print "<TR><TD>File is empty</TD></TR>";

my $filename = '/var/tmp/log.out';

open FILE, '<', $filename or error();

my @file1;
while ( <FILE> ) {
    next if /$grepstring/o;
    push @file1, $_;
    }

print "@file1";
[download]

Comment on Re: Variable problem inside an array Download Code

Replies are listed 'Best First'.
Re^2: Variable problem inside an array by bittoni (Initiate) on Apr 16, 2009 at 08:31 UTC
Hi jwkrahn that works exactly as i wanted it to. Thank you so much for your help. Thanks for all the responses i have received. All knowledge is helpful to me.	[reply]