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
 nicht angemeldet
 nicht angemeldet