push @search, $line if $line =~ m/\Q$query/;