if ($haystack =~ /\Q$needle\E/i) {