Durch sub-array loopen (solved) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2023-12-10 23:52:28
Europe/Berlin
Login (Register)
- Preferences
- Statistics
Jemand zu Hause?
0 users online
3 guests

[thread]18124[/thread]

submit to reddit

Durch sub-array loopen [solved]

[solved]

Tags: perl5 Array Referenz Similar Threads

Readers: 18

Articles: hide open all | hide show old branches

+11 replies
Student87

2013-02-08 15:36
User since
2012-11-08
73 articles
BenutzerIn
Hi,

folgendes:
Code (perl): (dl )

1 2 3 4

perl -e '@array; $array[2]=undef; foreach(@array){print "yes"}' # Output: yesyesyes
Weil ich Element [2] auf undef setze, sind auch die Elemente [0] und [1] mit undef belegt worden. Deshalb bekomme ich beim loopen durch den Array 3 x yes zurück.

Hier bekomme ich aber nur 1 x yes als Ausgabe:
Code (perl): (dl )

1 2 3 4 5

perl -e '@array; $array[2]=undef; $array[2][2]=undef; foreach($array[2]){print "yes"}' # Output: yes
Wie kann ich durch Sub-Arrays loopen? Wurde er überhaupt erstellt? Ich vermute, dass ich die Referenz irgendwie dereferenzieren muss, aber mit \@ geht es nicht ... ?
Last edited: 2013-02-08 15:38:59 +0100 (CET)
- renee
  
  2013-02-08 15:44
  User since
  2003-08-04
  14371 articles
  ModeratorIn
  Du vermutest absolut richtig. So musst Du dereferenzieren:
  
  Code: (dl )
  
  foreach( @{$array[2]} ){print "yes"}
  
  Das @{} ist die dereferenzierung für ein Array, dementsprechend gibt es noch ${} für Skalare und %{} für Hashes.
  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/
- +8 replies
- pq
  
  2013-02-08 15:46
  User since
  2003-08-04
  12207 articles
  Admin1
  um auf eine array-referenz wie ein array zuzugreifen, schreibst du:
  @$arrayref, das ist kurz für @{ $arrayref }
  
  dementsprechend, wenn $array[2] eine arrayref ist, schreibst du:
  @{ $array[2] }
  
  um auf einzelne elemente zuzugreifen, schreibt man
  $arrayref->[23]
  
  dementsprechend wäre das für $array[2]:
  $array[2]->[23]
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  for my $element (@{ $array[2] }) { say $element; } for my $i (0 .. $#${ $array[2] }) { say $array[2]->[ $i ]; }
  
  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
  - +7 replies
  - Student87
    
    2013-02-08 23:32
    User since
    2012-11-08
    73 articles
    BenutzerIn
    
    2013-02-08T14:46:10 pq
    @$arrayref, das ist kurz für @{ $arrayref }
    
    Bist du sicher mit der Kurzform? Wenn ich die geschweiften Klammern weglasse, funktioniert es bei mir nicht:
    
    Code (perl): (dl )
    
    1 2 3 4
    
    perl -e '@array; $array[2][2]=undef; foreach(@$array[2]){print "yes "}' yes
    - +5 replies
    - pq
      
      2013-02-09 00:03
      
      User since
      2003-08-04
      12207 articles
      Admin1
      
      die kurzform geht auch nur da, wo es eindeutig ist.
      ansonsten muss man "nachhelfen" und die klammern setzen.
      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
      - +4 replies
      - Student87
        
        2013-02-09 19:05
        
        User since
        2012-11-08
        73 articles
        BenutzerIn
        
        Ah okay verstehe:
        
        Perl weiß nicht, ob ich eine skalare Variable, die eine Referenz enthält, dereferenzieren will und anschließend Element 2 haben will (= @{$array}[2]) oder ob ich Element 2 eines Arrays haben will, welches eine Referenz enthält, die ich anschließend dereferenzieren will (= @{ $array[2] }).
        
        +3 replies
        
        topeg
        
        2013-02-09 19:21
        
        User since
        2006-07-10
        2611 articles
        BenutzerIn
        
        Korrekt.
        
        Wobei zu beachten ist:
        In Perl5 ist so was ein Fehler: @array[2]
        Da du Perl sagst: Gib mir aus "array" ein Array zurück. Was in dem Fall nicht möglich ist, da du nur ein Element angibst, auf das Zugegriffen werden soll. Mit "warnings" aktiv wirst du darauf hingewiesen. (use warnings;)
        Dagegen korrekt wäre so was: @array[1,2,3] Denn hier willst du drei Elemente Aus "array" und das als Array. Das kann Perl.
        Für das Setzen von Werten gilt das selbe.
        
        In Perl5 sagt das Perfix was du haben willst, nicht was es ist. Viele Anfänger bringen das durcheinander.
        
        Student87
        
        2013-02-09 19:37
        
        User since
        2012-11-08
        73 articles
        BenutzerIn
        
        2013-02-09T18:21:52 topeg
        In Perl5 ist so was ein Fehler
        
        Bekommt man in Perl6 einen 1-elementigen Array ausgegeben ?
        
        pq
        
        2013-02-09 21:33
        
        User since
        2003-08-04
        12207 articles
        Admin1
        
        2013-02-09T18:21:52 topeg
        Korrekt.
        
        Wobei zu beachten ist:
        In Perl5 ist so was ein Fehler: @array[2]
        
        nein, das ist kein fehler, mit warnings wirst du aber gewarnt, weil du eben nur ein element haben willst und vermutlich $ statt @ verwenden wolltest.
        
        Quote
        Da du Perl sagst: Gib mir aus "array" ein Array zurück.
        
        kein array, sondern ein slice.
        
        Quote
        Was in dem Fall nicht möglich ist, da du nur ein Element angibst,
        
        möglich ist es. ein slice von einem element ist völlig legitim.
        
        beispiel:
        
        Code: (dl )
        
        1 2 3 4 5
        
        $ perl -wE' my @a = 0..5; my @b = 3; say @a[@b]' 3 $ perl -wE' my @a = 0..5; my @b = 3; say @a[3]' Scalar value @a[3] better written as $a[3] at -e line 1. 3
        
        der punkt ist, beim ersten beispiel willst du offensichtlich ein slice mit *möglicherweise* mehreren elementen. keine warnung.
        beim zweiten schreibst du explizit nur ein element hin, daher die warnung.
        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
    - Linuxer
      
      2013-02-09 00:06
      
      User since
      2006-01-27
      3855 articles
      HausmeisterIn
      
      Ja, sie ist sich sicher ;-)
      
      Sie hat einen einfachen Skalar gezeigt, in dem eine Array-Referenz gespeichert ist. Du hast aber ein Array-Element, in dem diese Referenz liegt. Das ist ein wenig komplexer und muss daher genauer bezeichnet werden.
      
      Bei @$array[2] ist nicht eindeutig, was genau gemeint ist und wie derefenziert werden soll. Soll es als @{$array}[2] oder als @{ $array[2] } ausgewertet werden? Mit der Klammerung macht man das eindeutig.
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- betterworld
  
  2013-02-09 17:08
  User since
  2003-08-21
  2613 articles
  ModeratorIn
  2013-02-08T14:36:11 Student87
  
  Code (perl): (dl )
  
  1 2
  
  $array[2]=undef; $array[2][2]=undef;
  
  Die erste Zeile hier würde ich weglassen. Mit der zweiten Zeile werden schon beide Arrays angelegt. Das "undef", was Du zunächst abspeicherst, wird dann ja sowieso durch ein Array ersetzt.
  Lieblingsmodule: IPC::System::Simple, Path::Class

View all threads created 2013-02-08 15:36.