Verständnisfrage zu Array und Referenzen (gelöst) (Allgemeines zu Perl)

[thread]16239[/thread]

Verständnisfrage zu Array und Referenzen [gelöst]

Tags: perl5 Array Referenz Ähnliche Threads

Leser: 19

Articles: hide open all | hide show old branches

+5 replies
bianca

2011-04-29 20:13
User since
2009-09-13
7016 Artikel
BenutzerIn
Hi!
Folgendes Script:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13 14

#!/usr/bin/perl -w use strict; use warnings; my $test = 'a,b,c'; test ([split /\,/,$test]); print "haupt: " . $test . "\n"; sub test { my ($t) = @_; print "sub sagt: " . $t -> [2] . "\n"; $t -> [0] = 'z'; }
Ausgabe:
Code: (dl )

1 2

sub sagt: c haupt: a,b,c
Verständnisfrage: Wo schreibt Perl das 'z' für Array [0] hin?
$test wird ja anscheinend nicht neu zusammengesetzt, das wäre auch zu weit hergeholt. Aber was passiert mit dem 'z', wo landet das? Warum erhalte ich für das Konstrukt von Perl keine Fehlermeldung oder einen Hinweis nach dem Motto "ich schreibe hier ins Leere"?
Danke Euch
10 print "Hallo"
20 goto 10
- +4 replies
- GwenDragon
  
  2011-04-29 20:23
  User since
  2005-01-17
  14761 Artikel
  Admin1
  Du wolltest wohl sowas:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
  
  #!/usr/bin/perl -w use strict; use warnings; my $test = 'a,b,c'; my $array = [split /\,/,$test]; test ($array); print "haupt: @$array\n"; sub test { my ($t) = @_; print "sub sagt: " . $t -> [2] . "\n"; $t -> [0] = 'z'; }
  
  Du veränderst in deinem Programm in Zeile 13 nur den Inhalt des anonymen Arrays, das in Zeile 7 übergeben wurde, greifst aber in Zeile 8 auf die Zeichenkette zu.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +3 replies
  - bianca
    
    2011-04-29 20:32
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    2011-04-29T18:23:28 GwenDragon
    Du wolltest wohl sowas:
    
    Nein. Ging mir nur um das Verstehen an sich.
    
    2011-04-29T18:23:28 GwenDragon
    Du veränderst in deinem Programm in Zeile 13 nur den Inhalt des anonymen Arrays, das in Zeile 7 übergeben wurde
    
    yes, I know.
    
    Was ich daran halt nicht verstehe ist die Tatsache, dass ich mit $t -> [0] = 'z' ja eigentlich in ein "nichts" schreibe, weil ich aus dem Hauptprogramm garkein benanntes Array übergeben habe.
    Wieso geht das ohne jegliche Warnung und Hinweis ab?
    10 print "Hallo"
    20 goto 10
    - +2 replies
    - topeg
      
      2011-04-29 21:22
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      Du erzeugst eien anonymes Array, dessen Referenz in $t landet. solange die Variable existiert (innerhalb von "&test" ) geibt es auch das Anonyme Array. Was du geschrieben hast ist gleichbedeutend zu:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12 13 14
      
      #!/usr/bin/perl -w use strict; use warnings; my $test = 'a,b,c'; test ($test); print "haupt: " . $test . "\n"; sub test { my $t = [split /\,/,$_[0]]; print "sub sagt: " . $t -> [2] . "\n"; $t -> [0] = 'z'; }
      - bianca
        
        2011-04-30 07:52
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        Hab ich verstanden, danke dir.
        10 print "Hallo"
        20 goto 10

View all threads created 2011-04-29 20:13.