Grep mehrdimensionales Array (Allgemeines zu Perl)

[thread]16208[/thread]

Grep mehrdimensionales Array

Tags: grep Ähnliche Threads

Leser: 24

Articles: hide open all | hide show old branches

+4 replies
Gast Moffel

2011-04-20 10:35
Hi, ich habe ein Problem mit der grep Funktion bei einem Mehrdimensionalen Array. Das Ausgangsarray sieht so aus:
1 1 1
2 2 2
3 3 3

Ich würde gerne in ein neues Array alle Zeilen des Ausgangsarray schreiben, welche in der zweiten Spalte einen Eintrag größer 2 haben, sprich nur den Eintrag [3,3,3].

Hier mal der Code:
Code: (dl )

1 2

@myNames = ([1,1,1],[2,2,2],[3,3,3]); @gN = grep{2 < @{@myNames[1]}} @myNames;
Irgendwie schaffe ich es aber nicht die 2. Zeile des Ausgangsarrays anzusprechen...
Könnt ihr mir helfen?
Last edited: 2011-04-20 10:56:08 +0200 (CEST)
- renee
  
  2011-04-20 10:58
  User since
  2003-08-04
  14371 Artikel
  ModeratorIn
  Du muss in dem grep-Block das Arrayelement dereferenzieren. In $_ steckt ja immer ein Element vom Ausgangsarray, also eine Arrayreferenz.
  
  Code (perl): (dl )
  
  my @result = grep{ $_->[1] > 2 }@array
  
  OTRS-Erweiterungen (http://feature-addons.de/)
  Frankfurt Perlmongers (http://frankfurt.pm/)
  --
  
  Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
  Perl-Entwicklung: http://perl-services.de/
- +2 replies
- pq
  
  2011-04-20 11:01
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  ich kann mir nicht helfen, aber das sieht für mich wie perl 5 aus.
  geht es hier wirklich um perl 6?
  
  falls es um perl 5 geht, bitte ich um eine erklärung, warum du das im forum "Perl 6" gepostet hast, denn das passiert hin und wieder mal, und ich hab absolut keine ahnung, wie ich sowas verhindern könnte. ich dachte immer, "Perl 6" als titel sollte eben genug information sein, um zu sagen, nun, dass es sich eben um perl 6 handelt und nicht um perl 5.
  wäre also wirklich froh, wenn du das erklären könntest. danke.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - lichtkind
    
    2011-04-20 20:37
    User since
    2004-03-22
    5697 Artikel
    ModeratorIn + EditorIn
    
    es ist definitiv p5, da eine deref wie
    
    Code (perl): (dl )
    
    @{@myNames[1]}
    
    in perl 6 unötig und parse error ist
    Tutorien in der Wiki, mein zeug:
    kephra, baumhaus, garten, gezwitscher
    
    Es beginnt immer mit einer Entscheidung.

View all threads created 2011-04-20 10:35.