Hashes auslesen! (Allgemeines zu Perl)

[thread]19068[/thread]

Hashes auslesen!

Tags: perl5 Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+6 replies
bandchef

2014-05-05 09:09
User since
2014-05-05
15 Artikel
BenutzerIn
Hi Leute!

Ich hab folgenden Hash angelegt:
Code: (dl )

1 2 3 4 5 6

$food_color = ( Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red" );
und diesen Hash möchte ich mit dieser foreach-Schleife auslesen:
Code: (dl )

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

# food color per the introduction foreach $name ("Banana", "Martini") { if(exists($food_color{$name})) { # it exists print "$name is a food. \n"; } else { # it doesn't print "$name is a drink.\n"; } }
Nun ist es aber so, dass mir die foreach-Schleife beim print nix ausgibt. Was ist beim Hash falsch?
Last edited: 2014-05-05 10:37:40 +0200 (CEST)
- +2 replies
- payx
  
  2014-05-05 10:43
  User since
  2006-05-04
  564 Artikel
  BenutzerIn
  2014-05-05T07:09:59 bandchef
  Ich hab folgenden Hash angelegt:
  
  Code: (dl )
  
  $food_color = ...
  
  Damit hast Du keinen Hash angelegt, auch keinen HashRef.
  
  Einen Hash erzeugst Du so:
  
  Code (perl): (dl )
  
  %food_color = ...
  
  HTH
  Grüße
  payx
  - payx
    
    2014-05-05 10:52
    User since
    2006-05-04
    564 Artikel
    BenutzerIn
    
    Weitere Möglichkeit mit HashRef: Geschweifte Klammern verwenden
    
    Code (perl): (dl )
    
    1 2 3 4 5 6
    
    $food_color = { Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red" };
    
    Dann musst Du weiter unten dereferenzieren:
    
    Code (perl): (dl )
    
    if(exists($food_color->{$name}))
    
    Auf jeden Fall solltest Du am Anfang Deines Scriptes immer schreiben:
    
    Code (perl): (dl )
    
    1 2
    
    use strict; use warnings;
    
    Dann musst Du Deine Variablen mit my definieren, also my %food_color usw.
    
    Lies dazu: http://wiki.perl-community.de/Wissensbasis/UseStri...
    Last edited: 2014-05-05 11:02:39 +0200 (CEST)
- Raubtier
  
  2014-05-05 10:49
  User since
  2012-05-04
  1083 Artikel
  BenutzerIn
  Du benutzt folgendes?
  
  Code: (dl )
  
  1 2
  
  use strict; use warnings;
  
  Wenn nicht, dann bitte benutzen! "use warnings" hätte dann eigentlich meckern sollen: useless use of a constant (für alles von Raspberry bis Cherry)
- GwenDragon
  
  2014-05-05 11:02
  User since
  2005-01-17
  14890 Artikel
  Admin1
  Mit
  
  Code: (dl )
  
  1 2 3 4 5 6
  
  $food_color = ( Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red" );
  
  weist du dem Skalar $food_color den letzten Wert aus der Liste
  ( Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red") zu.
  $food_color enthält nämlich red.
  
  ( Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red") bedeutet nämlich:
  ( "Raspberry", "blue", "Apple", "green", "Banana","yellow", "Cherry","red")
  
  Editiert von GwenDragon: Zuweisung aus Liste erklärt
  Last edited: 2014-05-05 11:06:01 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
- pq
  
  2014-05-05 11:14
  User since
  2003-08-04
  12209 Artikel
  Admin1
  2014-05-05T07:09:59 bandchef
  Ich hab folgenden Hash angelegt:
  
  Code: (dl )
  
  1 2 3 4 5 6
  
  $food_color = ( Raspberry => "blue", Apple => "green", Banana => "yellow", Cherry => "red" );
  
  das ist schonmal kein hash.
  ich lege dir eins der folgenden tutorials ans herz: http://perl-tutorial.org/
  z.b. modern perl - the book.
  bitte ansehen, wenn möglich. diese grundlagen sind sehr wichtig.
  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

View all threads created 2014-05-05 09:09.