Was machen solche Hashes? (Allgemeines zu Perl)

[thread]19132[/thread]

Was machen solche Hashes?

Tags: perl5 Ähnliche Threads

Leser: 16

Articles: hide open all | hide show old branches

+4 replies
bandchef

2014-06-04 12:39
User since
2014-05-05
15 Artikel
BenutzerIn
Hi Leute!

Ich hab hier einige Code-Beispiele von Kollegen, durch die noch nicht ganz durchsteige...
Code: (dl )

1 2 3 4 5 6 7 8

my %hash1; foreach $fileLine(<ZFFILE>) { if($fileLine =~ /^TF Bus=(\w+)\sTFId=(\d+)\sSPort=(\d+)\sDIP=(\d+.\d+.\d+.\d+)\sDPort=(\d+)\sTP=(\w+)\s;\s(\w+)/) { $hash1{k} = {a => $1, b => $2, c => $3} } }
Was ich hier nun nicht verstehe, ist, die Zeile in den innersten geschweiften Klammern. Warum darf man der _eigentlichen_ hash-Variable hash1 den Typ von % (also Hash) zu $ (also Skalar) ändern? Und was macht dann die rechte Seite dieser Zeile? Die rechte Seite verhält sich dann wieder so, als ob man in einem Hash den Keys eben Werte zuweist! Verstehen tu ich das aber dennoch nicht.

In meinem O'Reilly Pearl-Buch hab ich das so nicht gefunden. Meine Kollege meint, dass das ein "anonymer" Hash sei...

Kann mich jemand aufklären?
- Linuxer
  
  2014-06-04 12:46
  User since
  2006-01-27
  3871 Artikel
  HausmeisterIn
  Mit dem Sigil % kennzeichnet man den kompletten Hash; wenn nur ein Wert in diesem Hash bezeichnet wird, verwendet man das Sigil $.
  Es geht darum, was man haben will; will man nur einen Wert (einen Skalar) haben, nimmt man $; wenn man den gesamten Hash haben will entsprechend %.
  
  Code: (dl )
  
  1 2
  
  my %hash = ( a => 1 }; # kompletter Hash print $hash{a}, "\n"; # nur der eine Value für den Schluessel 'a'
  
  Code: (dl )
  
  $hash1{k} = {a => $1, b => $2, c => $3}
  
  Damit wird ein Eintrag für den Schlüssel 'k' definiert. Als Wert wird eine Referenz auf einen anonymen Hash (geschweifte Klammern) zugewiesen; der anonyme Hash enthält die definierten 3 Schlüssel-Wert-Paare.
  
  Die so erzeugte Struktur heisst Hash-Of-Hashes.
  
  Empfohlene Doku:
  http://perldoc.perl.org/perldata.html
  http://perldoc.perl.org/perlreftut.html
  http://perldoc.perl.org/perlref.html
  http://perldoc.perl.org/perldsc.html
  
  Verwandtes Thema:
  http://perldoc.perl.org/perllol.html
  Last edited: 2014-06-04 12:52:38 +0200 (CEST)
  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!
- pq
  
  2014-06-04 12:49
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  ich empfehle ein modernes tutorial: http://perl-tutorial.org/
  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
- rosti
  
  2014-06-05 08:40
  User since
  2011-03-19
  3197 Artikel
  BenutzerIn
  Schlüssel und Werte in einem Hash sind immer Scalare. Dieser Grundsatz sollte eigentlich in einem jeden guten Perl-Buch stehen und auch, dass Referenzen Scalare sind. Diesen Grundsätzen folgend, kannst Du jede, auf den ersten Blick noch so komplizierte Datenstruktur verstehen und damit umgehen, wobei ein Hash-of-Hashes noch eine einfache Sache ist. So können Werte in einem Hash auch Referenzen auf Arrays sein und Datenstrukturen sind in der Praxis oft auch tiefer geschachtelt.
  
  Interessant ist evntl. noch, dass eine Schreibweise
  
  Code (perl): (dl )
  
  $foo->{bar}->{baz}->[0]
  
  vereinfacht werden kann insofern, als dass der erste Pfeil-Operator genügt:
  
  Code (perl): (dl )
  
  $foo->{bar}{baz}[0]
  
  --Rosti

View all threads created 2014-06-04 12:39.