my $q_meta = quotemeta($q);
my $tmp_test = ($test =~ /$q_meta/i) || 0;