Help for this page

Select Code to Download


  1. or download this
    $text =~ s/ 
        (?<!\\)'                     # A quote, NOT after a backslash
        (?:[^'\p{IsC}]*?(?:\\')?)*?  # This is hard to explain...
    ...
        (?:[^']*?(?:\\')?)*?         # More stuff...
        (?<!\\)'                     # Another single quote
        /'???'/gx;