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