nicht angemeldet
hi,
Ziel: In mehreren Arrays nach gemeinsamen Elementen suchen (Intersection).
In Perlfaq4 habe ich Einleitung gefunden die beschreibt
wie man gemeinsame Elemente ZWEI Arrays findet.
Habe auch versucht dieses zu adaptieren das es ein Array
liefert mit gemensamen Elementen -> fehlgeschlagen.
Habe auch gedacht eine Funktion zu basteln die
als Input einige Parameter kriegt - der Aufruf wurde ungef.
so aussehen:
&liefere_mir_gemensame_elemente($x,@array1,@array2,...)
wo
$x = "$a $a1 $a2 $a3 ...";
währe, und $a (der Anzahl der Arrays), $a1, $a2 ...
(der Elementenanzahl des Arrays @array1, @array2 ...)
Die Funktion wurde dann mehrere (zweier-Vergleiche) machen, abbrechen (FALSCH) wenn der @intersection-array irgendwann mal leer wird (ohne die Gesamtzahl der benötigten Vergleiche zu ereichen), oder denn array
zurückliefern (WAHR).
Das ganze währe fast ein neues Modul (Array::Intersect) ;-)
Habe aufgehört (ist zu hoch für mich - zur Zeit) :-(
Habe auch ein Modul mit verwandtem Thema gefunden
(Bit::Vector) - der vergleicht aber bits und nicht
Listen bzw. Arrays.
Ich habe viellecht ganz falsches Ansatz verfolgt -
vielleicht liege ich ganz nah - ICH WEIS ES NICHT.
Ideen ? Oder Lösungen ?
bye
Slobo