I don't know whether the search() method uses the Perl regexp engine or a Tcl regexp engine, and/or if there are any Tcl-ish quoting conventions left-over. My advice: try to match with a normal perl regexp on $text->get("1.0","end"). If it works there, then it's a problem with the regexp engine in search().