$text = '<p class="first">' . ($text =~ s|(\n\n+)|</p>\1<p class="later">|g) . '</p>';