my $test = "Hallo,\nDu bist angemeldet\n\nMit freundlichen Grüßen\n"; $text =~ s/(?>!\n)\n(?>\n)/
/g;