Beat: regex: Absatz finden und in <p> einfügen

Beitrag lesen

Das ganze sollte dann später mal so aussehen:

<p>Dies ist ein Text</p>
<p>Dies ist ein Absatz nach zwei Newlines</p>
<p>Ein weiterer Absatz</p>
<p>Noch ein Absatz</p>


>   
> Wie könnte man sowas in PERL umsetzen?  
  
`my $out = join('', map{ '<p>'.$_."</p>\n" } split( /\n{2,}/, $in ) );`{:.language-perl}  
  
mfg Beat

-- 

><o(((°>           ><o(((°>  

   <°)))o><                     ><o(((°>o  
Der Valigator leibt diese Fische