if ($hash{$filter[0]->[0]} $filter[0]->[1] $filter[0]->[2]) { print OUTFILE $line, "\n"; }