Guest jack

Hallo!

Das Array schaut so aus:

x1,y1,z1
x1,y2,z1
x1,y2,z1
x2,y1,z1
x2,y2,z1
x2,y2,z1

Das sieht nicht nach Perl aus. Wie hast Du das Array in Perl gespeichert?

Üblicherweise werden mehrdimensionale Arrays in Perl als Arrays von Arrayreferenzen gespeichert. Arrayreferenzen können unterschiedlich sein, selbst wenn die referenzierten Arrays denselben Inhalt haben. Daher wird in Deinem %seen-Hash für jede Array-Referenz ein neuer Eintrag erstellt.

Hast Du den Code mit dem %seen-Hash verstanden oder nur abgeschrieben? ;) Wenn ersteres der Fall ist, kannst Du Dir ja mal überlegen, wie Du darin den Inhalt der Arrays statt die Referenzen benutzen kannst. Wenn zweiteres der Fall ist, solltest Du nachfragen, was Du nicht verstanden hast, das ist besser, als wenn wir Dir eine Komplettlösung zusammenhacken und Dir nur Code zeigen.