pointer/referenzen (Raku / Perl 6)

[thread]17884[/thread]

pointer/referenzen

Tags: perl6 Ähnliche Threads

Leser: 20

Articles: hide open all | hide show old branches

+4 replies
Sven_123

2012-11-06 11:35
User since
2010-06-01
120 Artikel
BenutzerIn
Wie kann ich in Perl6 Referenzen erzeugen?

Wollte grad sowas in der Art umsetzen und bin dann drauf gestoßen, dass das \ jetzt captures erzeugt...finde leider weder in "Using Perl 6", noch in verschiedenen (teilweise seehr veralteten online-tutorials), wie ich das mach.
Code (perl): (dl )

1 2 3 4 5 6 7 8 9

use v6; my @x; fill_x(\@x); say @x.perl; sub fill_x($x_) { for ^3 {.say; @$x_.push($_)} }
- +2 replies
- GwenDragon
  
  2012-11-06 12:58
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  Hast du schon http://perl6advent.wordpress.com/2011/12/16/where-... gelesen?
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - Sven_123
    
    2012-11-06 13:19
    User since
    2010-06-01
    120 Artikel
    BenutzerIn
    
    Oh, ja, hatte ich, war aber schon zu lange her... :)
    
    Kann ich mir die Referenz denn trotzdem irgendwie ausgeben lassen? Ich meine, ich kann obiges schon umschreiben, so, dass es läuft, aber ich probier gern rum und würde z.B. bei einem:
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9
    
    use v6; my @x; fill_x(@x); say @x.perl; sub fill_x(@x_ is rw) { for ^3 {.say; @x_.push($_)} }
    
    gerne überprüfen können, ob @x und @x_ wirklich auf die gleiche Stelle zeigen. (Ginge hier vermutlich mit ===, aber wenn die Variablen z.B. nicht gleichzeitig, sondern nur zeitversetzt existieren...?)
    
    Hat mir schonmal geholfen, danke, ich lass den Thread aber vorerst nochmal ungelöst...irgendwie hab ich oft das Gefühl, dass ich nicht richtig weiß, was abläuft, in perl6...
    
    Edit: Wieso führt Subroutine hier z.B. zu einem anderen Ergebnis, als die anderen Übergaben...an dem Capture liegt es anscheinend nicht, zumindest sieht es für mich so aus, als würde da nur die Liste und keine Information über die ursprünglichen @x und @y gespeichert?
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
    
    use v6; my @x = 1,2,3; my @y = 4,5,6; say \(@x,@y).perl; my (@u,@v) = @x,@y; say ~@u; my $t = \(@x,@y); (@u,@v) = @$t; say ~@u; blub(@x,@y); sub blub(@h,@k) { say ~@h; }
    
    Last edited: 2012-11-06 16:31:13 +0100 (CET)
- GwenDragon
  
  2012-11-06 13:24
  
  User since
  2005-01-17
  14748 Artikel
  Admin1
  
  =:= ist der Operator um Referenzen zu vergleichen
  http://www.nntp.perl.org/group/perl.perl6.language...
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2012-11-06 11:35.