Corrected regex according to perl warnings

Perl complained about some regular expressions which were written like '\1' should be better written as '$1'