m/\Q$string\E/; #### $string = "Author[p100-107]\E-book.{Publisher}+_What?"; m/\Q$string\E/;