Help for this page

Select Code to Download

Select or download this

$escaped = qr/\\./;

...
      \1                     # end, probably \g-1 better
    /x;