Opened by Froschpopo at 2007-09-26 21:56
User since
2003-08-15
2653 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-15
2653 Artikel
BenutzerIn
Aber das stimmt ja nicht,
Ergebnis:
Es ist wider Willens ein <br> direkt hinter ]
Der Zeilenumbruch soll überall durch <br> ersetzt werden, außer hinter ]
Ansonsten soll für alle \n gelten: Niemals zwei hintereinander.
Code: (dl
)
1
2
3
4
5
6
7
8
9
#!/usr/bin/perl
use strict;
my $body = "Dies ist mein [HAUS]\n\n\nUnd ich wohne darin";
$body =~ s/(?!\])\n+/<br>/gs;
print $body;
Ergebnis:
Code: (dl
)
Dies ist mein [HAUS]<br>Und ich wohne darin
Es ist wider Willens ein <br> direkt hinter ]
Der Zeilenumbruch soll überall durch <br> ersetzt werden, außer hinter ]
Ansonsten soll für alle \n gelten: Niemals zwei hintereinander.