s{ (<p>
         (?=(?:(?!</p>).)*\n\n) # Followed by two newlines not preceded by </p>
         (?:(?!</p>).)*</p>)    # Followed by </p> not preceded by </p>
     }{-->$1<--}sgx;