Help for this page
$text = '<p class="first">' . do { $text =~ s|(\n\n+)|</p>\1<p class="later">|g; $text } . '</p>';