Hi,
Jetzt will ich aber zumindest zwei Zeilenumbrüche erlauben, damit Absätze wie oben mit einer freien Zeile möglich sind.
my $umbruch = '(\015\012\015\012)';
s/($umbruch{2})$umbruch+/$1/g;
(ungetestet)
Cheatah
Hi,
Jetzt will ich aber zumindest zwei Zeilenumbrüche erlauben, damit Absätze wie oben mit einer freien Zeile möglich sind.
my $umbruch = '(\015\012\015\012)';
s/($umbruch{2})$umbruch+/$1/g;
(ungetestet)
Cheatah