Hallo,
ich check es nicht. Hier mein Code.
my $text = 'Hallo das ist ein <br>Text';
print "$text\n";
if ($text =~ /(?!\s)<br>(?!\s)/)
{ $text =~ s/<br>/ /ig; }
else
{ $text =~ s/<br>//ig; }
print "$text\n";
Vielleicht sitze ich auf der Leitung.
Dann hätte ich noch das Problem
my $text = 'Hallo das ist ein <br> Text';
d.h. wenn vor und nach <br> ein Leerzeichen steht. Dann müsste ich z.B. $text =~ s/ <br>//ig;
ersetzen.
Ich sehe es einfach nicht.
Gruß
roger