Opened by Gast at 2005-07-05 16:55
User since
2005-02-18
357 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-02-18
357 Artikel
BenutzerIn
[quote=n0bbi,05.July.2005, 15:27]Die Lösung von Ronnie funktioniert einwandfrei![/quote]
Naja, ich würde gemäß Aufgabestellung die Lösung von Relais vorziehen
Edit: Fehlte die Neuzuweisung an $s vor RE2-Anwendung. Ausgabe bleibt aber gleich ;)\n\n
<!--EDIT|pKai|1120575219-->
Naja, ich würde gemäß Aufgabestellung die Lösung von Relais vorziehen
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
>perl
my $s = 'abc; ; ; ;def';
$s =~ s/;\s*;/;/g;
print "RE1", $s, $/;
$s = 'abc; ; ; ;def';
$s =~ s/(?:;\s*)*;/;/;
print "RE2", $s, $/;
^Z
RE1abc; ;def
RE2abc;def
Edit: Fehlte die Neuzuweisung an $s vor RE2-Anwendung. Ausgabe bleibt aber gleich ;)\n\n
<!--EDIT|pKai|1120575219-->
I sense a soul in search of answers.