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