schonwieder regex 2te bis Nte Komma ersetzen - #113789 (Allgemeines zu Perl)

Froschpopo

2008-08-21 05:25

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

Also dieses regexe bringen mich noch mal in die Klappse!!

Diesmal verstehe ich folgendes nicht:

Code (perl): (dl )

perl -e '$str = "Wort, Satz mit,- ohne Kommas"; @array = $str=~ /^(.+),\s*(.+)/; print $_,"\n" for @array';

bringt mir folgendes Ergebnis:

Code: (dl )

1
2

Wort, Satz mit
- ohne Kommas

Ich möchte aber, dass er NUR das erste Komma trifft !
Ich dachte, wenn ich den m-Modifier (?) weglasse, dann würde er nach dem ersten Treffer aufhören. Tut er ja in gewisser weise auch, aber stattdessen speichert er immer den letzten Treffer!
Kann man irgendwie festlegen, dass nur das erste Ergebnis festgehalten wird?
Was ich also brauche wäre das hier:

Code (perl): (dl )

@array = ('Wort', 'Satz mit,- ohne Kommas');

Ich habe zwar mittlerweile auch noch eine Lösung mit split() gefunden, aber das hier juckt mich trotzdem in den Fingern!