Regexe werden mit qr (kuh err) erzeugt, nicht mit gr (geh err).
Siehe auch http://perldoc.perl.org/perlop.html#Regexp-Quote-L...