nicht angemeldet
Veehrte Forumsleser,
ich sitze vor einem (fuer mich) kniffligen Perl Problem.
Ich habe ein array mit String Werten.
Wenn $array[x] == $array[x-1] dann sollen beide Elemente der Liste als Identifikation die gleiche Zahl erhalten.
Beispiel :
$array[0] == "bernd" und $array[1] == $array[0], dann sollen
$array[0] und $array[1] "1 bernd" als neuen Wert erhalten. Mit
der 1 als Identifikation.
$array[x+1] soll jetzt mit $array[x] verglichen werden.
Wenn $array[x+1] == $array[x] dann wie oben beschrieben.
Wenn $array[x+1] != $array[x], dann soll fuer $array[x+1] die
Identifikation um 1 erhoet werden (Identifikation++;) .
$array[x+2] soll jetzt mit $array[x+1] verglichen werden ...
Am Ende sollen alle Elemente des Feldes die direkt aufeinander folgen und den gleichen Wert haben auch die gleiche Identifikation besitzen.
Ich bedanke mich fuer Ihre Aufmerksamkeit !
Markus Banach