Perl: Aktuelles Array-Element entfernen

[Thomas Engelke]

Hallo!

Über eine Schwierigkeit stolpere ich bei nahezu allen meinen Perl-Programmen: Ich suche eine elegante Lösung dafür, das aktuell in der Iteration an eine Variable gebundene Teilstück eines Arrays aus dem Array zu entfernen.

foreach(@test) {
  if(<bedingung>) {
    # Entferne hier das an $_ gebundene Element aus @test
    # Von mir aus auch in ein neues Array
  };
};

Lösungen waren bisher meist derart, die Nummer der Subskription mitzuzählen und dann mittels Splices ein neues Array aufzubauen. Auch shift hilft nicht, da es ja immer nur das äußerste Element entfernt.

Hat jemand eine clevere alltagstaugliche Lösung dafür?

TME

[craano]

splice(@Datensatz,Indexnummer,1);

Mitzählen musst Du immer, ein neues Array aufbauen brauchst Du nicht.
Grüße.
craano.