Wie funktioniert push bei einem mehrdimensionalen Array? (gelöst) (Raku / Perl 6)

[thread]16060[/thread]

Wie funktioniert push bei einem mehrdimensionalen Array? [gelöst]

Leser: 28

Articles: hide open all | hide show old branches

+12 replies
Sven_123

2011-03-11 16:18
User since
2010-06-01
120 Artikel
BenutzerIn
Ich flute das perl6-Forum...*g

Diesmal schaff ich es nicht, push in einem mehrdimensionalen Array zu benutzen:
Code (perl): (dl )

1 2 3

my @y; push @y[0], [<a b>]; say @y[0][0][0];
Ich schätze, dass ihm nicht klar ist, dass @y[0] selbst ein Array sein soll, aber da sowas wie
Code (perl): (dl )

@y[0] = [1,2],[3,4];
funktioniert und meine Versuche @y[0] eindeutig als Array zu definieren (angelehnt an die Interpolation in "" und was, das ich aus nem Tutorial hab),
Code (perl): (dl )

1 2

push @y[0][], [<a b>]; push @(@y[0]), [<a b>];
zwar keinen Fehler, aber dafür einen leeren Array (ich schätze ein Any() bedeutet eben dies) produzieren, weiß ich wieder nicht so recht weiter...
- +2 replies
- clms
  
  2011-03-11 16:44
  User since
  2010-08-29
  373 Artikel
  BenutzerIn
  Ich habe wenig Erfahrung mit Perl6 und kann es hier auch nicht ausprobieren, aber ...
  
  2011-03-11T15:18:33 Sven_123
  
  Code (perl): (dl )
  
  1 2 3
  
  my @y; push @y[0], [<a b>]; say @y[0][0][0];
  
  y ist in deinem Beispiel doch nur ein 2-dim. Array.
  Ich würde erwarten dass say $y[0][0] "a" liefert.
  - Sven_123
    
    2011-03-11 21:50
    
    User since
    2010-06-01
    120 Artikel
    BenutzerIn
    
    Ne, der wär am Ende dreidimensional, ich pushe in @y[0] ja nicht <a b>, sondern [<a b>].
- +5 replies
- FtR
  
  2011-03-11 17:27
  User since
  2003-08-20
  39 Artikel
  BenutzerIn
  Ich hab das mal als lauter kleine Einzeiler gebaut
  
  Code: (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12
  
  ftr@home:./perl6 -e ' my @y; @y.push([< a b > ]); say @y[0]' a b ftr@home:./perl6 -e ' my @y; @y.push([< a b > ]); say @y[0][0]' a ftr@home:./perl6 -e ' my @y;@y[0]="FRED"; @y.push([< a b > ]); say @y[0][0]' FRED ftr@home:./perl6 -e ' my @y;@y[0]="FRED"; @y.push([< a b > ]); say @y[1][0]' a ftr@home:./perl6 -e 'my @y; @y[1]="FRED"; @y[0]= < a b >; say @y[0][0]; ' a ftr@home:./perl6 -e 'my @y; @y[1]="FRED"; @y[0]= < a b >; @y.[0].push("ADDME") ;say @y[0][2]; ' ADDME
  
  Code: ()
  
  1 2
  
  print&f(($_=(3x3)."3+33")=~s=3(?![^3]|$)=&f=eg); sub f{eval(@_?$_:"'$&+'x3");}
  - +4 replies
  - FtR
    
    2011-03-11 17:40
    User since
    2003-08-20
    39 Artikel
    BenutzerIn
    
    nochmal mit Kommentaren
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7
    
    my @y; @y.push([< a b >]); # ein Array als Element ein hängen say @y[0]' # den Array ausgeben say @y[0][0] # ein element ausgeben ==== AUSGABE === a b a
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9 10 11
    
    my @y; @y[0]="FRED"; @y.push([< a b > ]); # hinten eine Arrayref einhängen say @y[0]; say @y[0][0] # warum der tut ist mir nicht ganz klar say @y[1][0] ==== AUSGABE === FRED FRED a
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8
    
    'my @y; @y[1]="FRED"; @y[0]= < a b >; # eine Array Ref übergeben say @y[0][0]; ' ==== AUSGABE === a
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9
    
    my @y; @y[1]="FRED"; @y[0]= < a b >; @y.[0].push("ADDME") ; # in einem AoA rumspielen say @y[0][2]; ' ==== AUSGABE === ADDME
    
    Code: ()
    
    1 2
    
    print&f(($_=(3x3)."3+33")=~s=3(?![^3]|$)=&f=eg); sub f{eval(@_?$_:"'$&+'x3");}
    - +3 replies
    - lichtkind
      
      2011-03-11 19:26
      
      User since
      2004-03-22
      5679 Artikel
      ModeratorIn + EditorIn
      
      also erstmal wenn @y[0] nicht vorher ein array war gibt bei push ein geschrei vom compiler. wenn das beachtest geht auch das was du hier vorhast.
      
      und dein ergebnis kann man sich am schönsten perl @y.perl.say ausgeben.
      Tutorien in der Wiki, mein zeug:
      kephra, baumhaus, garten, gezwitscher
      
      Es beginnt immer mit einer Entscheidung.
      - +2 replies
      - Sven_123
        
        2011-03-11 21:56
        
        User since
        2010-06-01
        120 Artikel
        BenutzerIn
        
        Ich kann's grad nicht ausprobieren, aber FtRs letztes Beispiel würde bei mir glaub auch schon nicht klappen.
        
        Wie kann ich denn perl6 am sinnvollsten mitteilen, dass y[0] selbst ein Array ist, ohne ihn davor direkt mit Werten zu befüllen, wie FtR es macht? Meine, im ersten Post erwähnten Versuche (@y[0][].push und @(@y[0]).push) funktionieren jedenfalls nicht...
        
        FtR
        
        2011-03-12 01:40
        
        User since
        2003-08-20
        39 Artikel
        BenutzerIn
        
        Das da verhält sich so wie das einfügen eines array
        
        @y[0]= < a b >;
        
        Das sollte das in zwei schritten sein ( das was einem im Proggy am häufigsten passiert)
        
        @a = < a b >;
        @y[0]=@a;
        
        Meine Beispiele hab ich mit "Rakudo Star" den mit heute frisch von hier "https://github.com/rakudo/star/downloads" gezogen und gebaut habe probiert.
        
        Code: ()
        
        1 2
        
        print&f(($_=(3x3)."3+33")=~s=3(?![^3]|$)=&f=eg); sub f{eval(@_?$_:"'$&+'x3");}
- +4 replies
- moritz
  
  2011-03-12 08:50
  User since
  2007-05-11
  923 Artikel
  HausmeisterIn
  Das sollte gehen, geht aber noch nicht. push() hat noch nicht die gleiche Magie wie der Zuweisungsoperator. Workarounds:
  
  Code: (dl )
  
  1 2 3
  
  my @y = []; # oder @y[0] //= [];
  
  Perl 6 - Perls Zukunft
  - +3 replies
  - FtR
    
    2011-03-12 10:09
    User since
    2003-08-20
    39 Artikel
    BenutzerIn
    
    @moritz
    
    magst du mal einen Bezug auf eines der Postings herstellen?
    
    was meinst du mir "DAS sollte gehen"?
    
    Danke
    FtR
    
    Code: ()
    
    1 2
    
    print&f(($_=(3x3)."3+33")=~s=3(?![^3]|$)=&f=eg); sub f{eval(@_?$_:"'$&+'x3");}
    - Sven_123
      
      2011-03-12 13:55
      
      User since
      2010-06-01
      120 Artikel
      BenutzerIn
      
      Er bezieht sich auf mein Eingangsbeispiel, darauf, dass push() aus @y[0] einen Array machen sollte, und wie man die fehlende Eigenschaft durch vordefinieren von @y[0] als Array umgehen kann.
      
      So funktioniert's auch, nochmals vielen Dank. :)
      Last edited: 2011-03-12 14:02:04 +0100 (CET)
    - moritz
      
      2011-03-12 14:00
      
      User since
      2007-05-11
      923 Artikel
      HausmeisterIn
      
      2011-03-12T09:09:50 FtR
      magst du mal einen Bezug auf eines der Postings herstellen?
      
      Ich beziehe mich auf die ursprüngliche Frage. Die sich ja im Großen und Ganzen auf ein Stück Code bezieht. Das sollte funktionieren.
      Perl 6 - Perls Zukunft

View all threads created 2011-03-11 16:18.