sub in Variable ohne & (gelöst) (Allgemeines zu Perl)

[thread]18783[/thread]

sub in Variable ohne & [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 14

Articles: hide open all | hide show old branches

+4 replies
bianca

2013-12-01 09:02
User since
2009-09-13
6977 Artikel
BenutzerIn
Kurze Verständnisfrage: Wieso bringt das folgende Script ohne Verwendung des Kaufmannsund beim Aufruf im oberen Teil einen Syntax error? Im unteren Teil hingegen geht es ohne Kaufmannsund. Wieso?
Code (perl): (dl )

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

#!/usr/bin/perl use strict; use warnings; use 5.010; #--------------- my $lokal_config = sub { my ($c) = @_; $c->{foo}='bar'; }; my %lokal; &$lokal_config(\%lokal); say keys %lokal; #--------------- my %test = (foo => sub { my ($c) = @_; $c->{foo2}='bar'; }); my %lokal2; $test{foo}(\%lokal2); say keys %lokal2;
10 print "Hallo"
20 goto 10
- +3 replies
- GwenDragon
  
  2013-12-01 10:52
  
  User since
  2005-01-17
  14538 Artikel
  Admin1
  
  $lokal_config ist ein Scalar, der auf eine Sub zeigt. Muss doch erst dereferenziert werden.
  Es soll wohl $lokal_config->(\%lokal); sein ;)
  
  $lokal_config(\%lokal); dereferenziert nicht automatisch.
  Warum der Perl-Parser bei $test{foo}(\%lokal2); , einem Sub-Aufruf über den Hashwert automatisch Derefernzierung verwendet, hab ich jetzt nicht parat.
  
  Ich habe es mir zur Pflicht gemacht, bei einem Skalar wenigstens einmal -> zu verwenden.
  
  Editiert von GwenDragon: Inline-Code
  Last edited: 2013-12-01 11:04:39 +0100 (CET)
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
  - bianca
    
    2013-12-01 11:09
    
    User since
    2009-09-13
    6977 Artikel
    BenutzerIn
    
    MMMMMMM, jetzt wo ich es lese weiß ich es auch wieder. ->
    
    Danke dir
    10 print "Hallo"
    20 goto 10
  - Raubtier
    
    2013-12-01 11:30
    
    User since
    2012-05-04
    1054 Artikel
    BenutzerIn
    
    2013-12-01T09:52:33 GwenDragon
    $lokal_config(\%lokal); dereferenziert nicht automatisch.
    Warum der Perl-Parser bei $test{foo}(\%lokal2); , einem Sub-Aufruf über den Hashwert automatisch Derefernzierung verwendet, hab ich jetzt nicht parat.
    
    Naja, weil es dann ja nichts anderes sein kann. Das ist praktisch derselbe Grund, warum zum Beispiel auch hier keinen Pfeil braucht:
    perl -E'my %test = (foo => {b=>"c"});say $test{foo}{b} Das gilt dann auch für ein Array, das Referenzen auf Arrays/Hashes/Funktionen enthält. Bei mehreren Dimensionen braucht man den Pfeil nicht zwischen den einzelnen Zugriffs-Klammern. Oftmals ist ja dann auch des "oberste Ding", bei Bianca also %test, eine Referenz. Dann braucht ich mindestens den ersten Pfeil:
    perl -E'my $test = [foo, {b=>"c"}];say $test->[1]{b}'

View all threads created 2013-12-01 09:02.