if($_ =~ /\Q$str1\E/){...}