perl suche in string

[Christian Kruse]

Hallo henry,

"Hans""OTTO" k.sndkalsdn "FRANZ" lkhjlkhj "KARL""FRITZ" mit "$ergebnis =~ /\"(.+?)\"/,$mystring};"

bekomme ich ein Ergebnis, aber auch nur eins. Wie kann ich alle Ergebnisse in ein Array schreiben.

Du kannst mit einer einfachen Zuweisung die Matches aus den Sub-Patterns bekommen:

@matches = 'abc "def" ghi "jkl"' =~ /\"([^"]+)\"/g;
print join(' ', @matches), "\n";

Gibt def jkl.

LG,
CK