Help for this page

Select Code to Download


  1. or download this
      DB<175> $re = qr/ " (?: \\\\ | \\" | [^"] )* " /x;
    
    ...
    
      DB<177> $a =~ /$re/; print $&
    "..\".."