open LOG, "$logfile" or die "Can't open $logfile: $!\n"; my @fwlog = grep { $ip } ; close LOG;