$text =~ m/\Q$str/;