>Mehrdimensionales Array<: Entfernen von doppelten Einträgen - #134154 (Allgemeines zu Perl)

Gast Jack

2010-03-06 22:24

Hallo betterworld,

die Darstellung meines Arrays war schematisch gemeint.
Ich fülle mein Array mit push()

Code (perl): (dl )

1
2

my @daten;
push (@daten, [$xWert, $yWert, $zWert]);

Somit habe ich ein 3D-Array, deren Daten sich teilweise (wie oben dargestellt) wiederholen. Die Wiederholungen sollen entfernt werden.

Und ja, du hast recht: Den Trick mit %seen habe ich einfach abgeschrieben ;-)

Ich habe mich in der Zwischenzeit an einer anderen Lösung versucht:

Code (perl): (dl )

my @unique;
my %seen = ();

foreach my $elem (@daten)
{
   next if @$seen {$elem}++;
   push @unique, $elem;
}

Auch das führt leider nicht zum Erfolg? Ich bitte um Hinweise, woran's liegen könnte...

Danke!