pktm+2007-10-06 14:23:02--

Das klappt aber nur, wenn sich die Anzahl ' in der Zeile nicht ändert.
Wenn du hingegen auf das distinktive Muster "Dollar($) gefolgt von Zeichen mit \[\] gefolgt von einen =, einem Leerzeichen und einem '" kontrentrierst bekommst du eventuell leichter, da du deinen Kode nicht für jede neue STruktur (z.B. mit zwei ' mehr) anpassen musst.

1
2
3
4
5

....
    my @array = split(/= '/, $zeile);
    $array[1]=~s/'.*$//;
    my @brray = split(/,/, $array[1]);
....

    my @array = split(/= *'/, $zeile);