[RegEx] match ; aber nicht ü

[svn]

Hallo,
ich sitze seit Stunden an einem Problem.

Ich habe folgenden String:

rot;gelb;grün;blau

Wie teile ich den String mittels RegEx damit ich

rot
gelb
grün
blau

erhalte?

 

[kauan]

Mir kommt spontan folgendes in den Sinn:
erst ü in ü ersetzen
dann ; in \n ersetzen
dann wieder ü zurück in ü

gruss
Jonathan

 

[svn]

Leider hab ich das voll $xxx; Programm an Html-Codes. :/

 

[Maluku]

Es ist so nicht möglich wie du das willst, dafür bräuchtest du eine look behind assertion mit variabler lenge:
/(?<!&\w+);/ (An semicolon teilen, es sei denn, es ist ein & und eine variable menge buchstaben davor...

Aber mit einer match-Regex kann man alle (auch die mit mehreren &umlauten; ) finden:

/((?:\w*&\w+;\w*)*|\w+)(?:;|$)/g

Beispiel (in perl):

C:\Users\Maluku>perl -e "$a='rot;gelb;grün;blau;grüngräulich';print $1,qq(\n) while $a=~/((?:\w*&\w+;\w*)*|\w+)(?:;|$)/g"
rot
gelb
grün
blau
grüngräulich

Erklärung: Füllte die erste Match Gruppe ($1 in perl) mit entweder einer beliebigen Menge an \w*&\w+;\w* (d.h.) HTML-Entities mit Buchstaben drumrum oder einem Wort ohne Umlaute: \w+
Die (?: ... )* um die erste Gruppe ist nur zur Gruppierung, damit man den Sachen vermehrfachen kann.
Das ganze bis zu einem ; oder Stringende ($)

Wenn du auch noch Leerzeichen oder andere Sonderzeichen im String hast, dann musst du die Regex so anpassen:

/((?:[^;]*&\w+;[^;&]*)*|[^;]+)(?:;|$)/g

Beispiel:

C:\Users\Maluku>perl -e "$a='rot;gelb;grün;blau;grüngräulich;gün und grell (eher grün als grell)';print $1,qq(\n) while $a=~/((?:[^;]*&\w+;[^;&]*)*|[^;]+)(?:;|$)/g"
rot
gelb
grün
blau
grüngräulich
gün und grell (eher grün als grell)