Wie dereferenziert ihr? (Allgemeines zu Perl)

[thread]19234[/thread]

Wie dereferenziert ihr?

Leser: 25

Question: Wie dereferenziert ihr?
	$hashref->{foo}
	$$hashref{foo}
	${$hashref}{foo}
	ich dereferenziere nicht
	ich weiss gar nicht, was das ist.
You have to log in to vote.
21 voter(s) so far

Articles: hide open all | hide show old branches

+16 replies
pq

2014-08-10 13:16
User since
2003-08-04
12208 Artikel
Admin1
gegeben eine hashref
Code (perl): (dl )

1 2 3 4

my $hashref = { foo => "oof" }; say $hashref->{foo}; say $$hashref{foo}; say ${$hashref}{foo};
entsprechend funktioniert das auch mit arrayrefs:
Code (perl): (dl )

1 2 3 4

my $arrayref = ["a", "b", "c"]; say $arrayref->[0]; say $$arrayref[0]; say ${$arrayref}[0];
ich persönlich finde die erste variante am lesbarsten, ich stosse aber auch ab und zu auf die beiden anderen und frage mich dann, wie kann man sowas lesbar finden?
was benutzt ihr?
alternativ, wenn ihr sowas gar nicht benutzt: was findet ihr am lesbarsten?

modedit Editiert von GwenDragon: ' entfernt
Last edited: 2014-08-11 13:01:38 +0200 (CEST)
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
- +4 replies
- Linuxer
  
  2014-08-10 14:05
  User since
  2006-01-27
  3870 Artikel
  HausmeisterIn
  In aller Regel verwende ich die erste Variante. Selten, vor allem wenn es darum geht, mehrere Werte gleichzeitig aus einer Hash-Ref zu holen, nutze ich dann auch mal diese Schreibweise:
  
  Code (perl): (dl )
  
  1 2 3
  
  @{ $hashref }{ qw( key1 key2 ) }; # anstatt $hashref->{key1}, $hashref->{key2};
  
  Last edited: 2014-08-10 14:31:23 +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!
  - +3 replies
  - pq
    
    2014-08-10 15:24
    
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    ja, bei slices mache ich das auch. da geht's ja auch nicht anders, zumindest bis perl 5.18 ;-)
    ab 5.20 geht dann, falls das feature sich durchsetzt:
    $hashref->@{ qw( key1 key2 ) };
    ich mags =)
    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
    - lichtkind
      
      2014-08-10 17:37
      
      User since
      2004-03-22
      5679 Artikel
      ModeratorIn + EditorIn
      
      ja das wollte ich vorhin erwähnen, ich fands zuerst seltsam aber es ist gut, einfacher lesbar, folgt allen bisherigen regeln und unterstützt alles (inkl typeglobs)
      Tutorien in der Wiki, mein zeug:
      kephra, baumhaus, garten, gezwitscher
      
      Es beginnt immer mit einer Entscheidung.
    - GwenDragon
      
      2014-08-11 10:40
      
      User since
      2005-01-17
      14533 Artikel
      Admin1
      
      Ich bin auch froh, dass ab 5.20 das erweiterte Deref mit ->@ etc. möglich sein wird.
      die Drachin, Gwendolyn
      
      Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
- +3 replies
- hlubenow
  
  2014-08-10 16:55
  User since
  2009-02-22
  875 Artikel
  BenutzerIn
  Ich vermeide Referenzen, wenn möglich. Wenn eine Referenz dennoch erforderlich ist, gönne ich mir beim Dereferenzieren eine neue Hash/Array-Variable, um dann auf der einfacheren Ebene weiterarbeiten zu können:
  
  Code (perl): (dl )
  
  1 2 3
  
  my $arrayref = ["a", "b", "c"]; my @a = @$arrayref; say $a[0];
  
  Bei AoA, die man braucht, um komplexere Datenmengen zu verarbeiten, ist mir diese Konstruktion, die ich hier aus dem Forum habe, wichtig (weil das dann genauso wie in Python funktioniert und ich nicht über Referenzen nachdenken muß):
  
  Code (perl): (dl )
  
  1 2 3
  
  my @b = (["a", "b", "c"], ["d", "e", "f"]); say $b[1][0];
  - dominicn
    
    2014-08-10 21:32
    User since
    2003-08-08
    327 Artikel
    BenutzerIn
    
    Ich nutze generell die erste Variante, also Dereferenzierung mit Pfeil. Auch bei mehreren Dereferenzierungen nutze ich immer den Pfeil, obwohl das da ja nicht notwendig ist, z.B.:
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9
    
    my $hashref = { a => 1, b => { c => 897, d => 584, }, }; say $hashref->{b}->{d}; say $hashref->{b}{d}; # das mag ich persönlich nicht so sehr
    
    Auf die neuen Dereferenzierungsmöglichkeiten ab 5.18 oder 20 freue ich mich schon sehr. Aber so lange das noch experimentell ist, ist natürlich fraglich ob man das in produktivem Code einsetzen sollte (vorausgesetzt, der kann überhaupt schon mit diesen neuen Versionen arbeiten).
    Last edited: 2014-08-10 21:33:55 +0200 (CEST)
  - murphy
    
    2014-08-10 23:18
    
    User since
    2004-07-19
    1776 Artikel
    HausmeisterIn
    
    2014-08-10T14:55:57 hlubenow
    Ich vermeide Referenzen, wenn möglich. Wenn eine Referenz dennoch erforderlich ist, gönne ich mir beim Dereferenzieren eine neue Hash/Array-Variable, um dann auf der einfacheren Ebene weiterarbeiten zu können:
    [...]
    
    Das verbessert zwar in der Tat die Lesbarkeit, erzeugt aber eine Kopie der Daten, was man nicht immer will :-/ Vermeiden kann man die Kopie indem man beim Dereferenzieren mit Typeglobs herumspielt, aber dann wird es wiederum viel unklarer, was passiert.
    When C++ is your hammer, every problem looks like your thumb.
- murphy
  
  2014-08-10 23:24
  
  User since
  2004-07-19
  1776 Artikel
  HausmeisterIn
  
  Ich finde die Syntax $ref->{foo} meist am hübschesten, das explizite ${$ref}{bar} ist aber auch nicht allzu kryptisch wenn man sich an die Mechanik der Sigills gewöhnt hat.
  
  Das neue use feature qw(postderef) gefällt mir auch ganz gut, weil es insbesondere Ketten von Derefenrenzierungen mit einem Slice am Ende noch leichter und einheitlicher notierbar macht.
  When C++ is your hammer, every problem looks like your thumb.
- +7 replies
- GwenDragon
  
  2014-08-11 10:26
  
  User since
  2005-01-17
  14533 Artikel
  Admin1
  
  Nr. 1 weil lesbarer und nachvollziehbarer ist, nur bei Fremdcode muss ich ab und an mal zu Nr. 3 greifen.
  
  Leider erzeugt für mich die Dereferenzierung mit Umklammerungen zu viel line noise, -> bietet da mehr Halt beim lesen. Und andere verstehen Perl-Code auch oft besser mit dem ->.
  
  Wenn der Dref-Bandwurm zu arg lang wird, selbst mit -> in nächste Zeilen untereinander, benutze ich "Zwischenvariablen", um zwischenzuspeichern.
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
  - rosti
    
    2014-08-11 11:09
    User since
    2011-03-19
    3194 Artikel
    BenutzerIn
    
    Quote
    Wenn der Dref-Bandwurm zu arg lang wird, selbst mit -> in nächste Zeilen untereinander, benutze ich "Zwischenvariablen", um zwischenzuspeichern.
    
    Mache ich auch so, insbesondere dann, wenn Referenzen übergeben werden, wo damit in der sub zu sehen ist, welcher Zweig am Wickel ist. In speziellen Fällen schalte ich eine weitere Methode ein zur Datenabstraktion, Beispiel:
    
    Es gibt eine Interface-Methode control(), welche aufgerufen wird, wenn HTTP-Request-Parameter im Spiel sind.
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7
    
    sub control{ my $self = shift; # wir könnten jetzt über $self->{PARAMS} # auf die Parameter zugreifen # die Abstraktion sieht jedoch den Aufruf einer weiteren Methode vor: $self->param(); }
    
    Das sichert die Austauschbarkeit des Parsers, weil nicht jeder Parser, den ich einsetze, die Referenz
    $self->{PARAMS} erzeugt. Ab Aufruf der Methode $self->param() ist die weitere Datenverarbeitung dann wieder einheitlich.
    
    PS: Dreh- und Angelpunkt ist natürlich auch eine Referenz: $self->{CGI}, es lebe der Pfeil ;)
    Last edited: 2014-08-11 22:25:19 +0200 (CEST)
  - +5 replies
  - TGoonie
    
    2014-08-11 16:14
    User since
    2013-10-21
    6 Artikel
    BenutzerIn
    
    Gibt doch nix entspannteres als endlos ineinander verschachtelte hashes :-)
    In der -> Schreibweise verliere ich bis zu einer gewissen länge auch den Überblick nicht. Wenn's mal länger wird dann wird eben ein Teil in einer temporären Variable gespeichert um den Rattenschwanz abzukürzen...
    
    So was geht noch lockerst: :-)
    
    Code: (dl )
    
    1 2 3 4
    
    if (defined ($locke->{'Information_m_s_b'})){ $line=$S->{$log4check}->{$ruleset}->{$sonderlocke}->{$x}->{'line'}; $log->{'mess'}->{'Special'}=$locke->{'Information_m_s_b'}; }
    
    }
    „Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber bei dem Universum bin ich mir noch nicht ganz sicher.“ ( Albert Einstein )
    - +4 replies
    - Gast wer
      
      2014-08-20 00:12
      
      pfff...
      
      bei so was wirds lustig:
      
      Code (perl): (dl )
      
      $value=$data->{$param->{$keys->{param}->{$key}->{name}}->{$key}->{name}}->{$key}->{value}
      
      Last edited: 2014-08-20 00:36:30 +0200 (CEST)
      - +3 replies
      - lichtkind
        
        2014-08-20 18:20
        
        User since
        2004-03-22
        5679 Artikel
        ModeratorIn + EditorIn
        
        deswegen schreibt man ja auch
        
        Code (perl): (dl )
        
        $value=$data->{ $param->{ $keys->{param}{$key}{name} }{$key}{name} }{$key}{value}
        
        Tutorien in der Wiki, mein zeug:
        kephra, baumhaus, garten, gezwitscher
        
        Es beginnt immer mit einer Entscheidung.
        
        +2 replies
        
        pq
        
        2014-08-20 19:38
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        wenns sein muss:
        
        Code (perl): (dl )
        
        1 2 3 4 5
        
        $value = $data->{ $param->{ $keys->{param}->{ $key }->{name} }->{ $key }->{name} }->{ $key }->{value}
        
        aber ich würde der person, die das maintainen muss, eher ein oder zwei temporäre variablen gönnen.
        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
        
        lichtkind
        
        2014-08-20 22:02
        
        User since
        2004-03-22
        5679 Artikel
        ModeratorIn + EditorIn
        
        Die könnten vor allem helfen zu erklären wozu das Ganze.
        Tutorien in der Wiki, mein zeug:
        kephra, baumhaus, garten, gezwitscher
        
        Es beginnt immer mit einer Entscheidung.

View all threads created 2014-08-10 13:16.