<br> entfernen gegen bedingt Leerzeichen

[roger]

Dass du besser eine Callback Funktion verwenden solltest, um deine Probleme kontrolliert zu behandeln.

$text =~ s/ ( \s* <br> \s* ) /breakify($1)/gex;

sub breakify{
  $[0] eq " <br>" and return "bla";
  $[0] eq "<br> " and return "blub";
  $_[0] eq " <br> " and return "smurf";
  return "gulb"
}

>   
> mfg Beat  
  
  
Hallo,  
  
das ist schon lecker  
  
 Danke  
   roger