Coderef auf unbekannt (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-12-25 06:21:36
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
1 Gast

[thread]19520[/thread]

submit to reddit

Coderef auf unbekannt

Tags: perl5 Ähnliche Threads

Leser: 15

Articles: hide open all | hide show old branches

+14 replies
Raubtier

2015-02-20 15:51
User since
2012-05-04
1076 Artikel
BenutzerIn
Inspiriert durch Biancas Thread (Bad name after...) habe ich eine Frage, nämlich warum es überhaupt funktioniert (=etwas tut und keinen Compilefehler gibt), eine Codereferenz auf etwas unbekanntes zu erzeugen und was das für eine merkwürdige sub ist, die Dumper mir zeigt:
Code: (dl )

1 2

perl -MData::Dumper -Mstrict -wE'$coderef = \&noch_unbekannt; print Dumper $coderef' $VAR1 = sub { "DUMMY" };
In welchem perldoc steht hierzu was drin?
- +3 replies
- bianca
  
  2015-02-20 15:52
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Wenigstens ist mein Thread inspirierend :)
  Gelöst leider noch nicht.
  10 print "Hallo"
  20 goto 10
  - +2 replies
  - Raubtier
    
    2015-02-20 16:07
    
    User since
    2012-05-04
    1076 Artikel
    BenutzerIn
    
    Naja, die Lösung wäre natürlich, deine Voraussetzung zu ändern (bestimmte Codestellen, die die Probleme erst verursachen, willst du ja nicht ändern).
    - bianca
      
      2015-02-20 16:12
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      Alles - bis auf die externen Scripte die per require eingebunden werden - kann geändert werden.
      10 print "Hallo"
      20 goto 10
- +3 replies
- Muffi
  
  2015-02-20 16:13
  
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  
  Ich würd mal vermuten, dass der Dumper bei jeder sub DUMMY reinschreibt. Eine sub kanner ja nciht sinnvoll dumpen.
  Und so: Eine Perlvariable hat ja einen Wert (wohl undef) und einen Typ (hier wohl Code) und wenn Typ Code schreibt Dumper halt das DUMMY. </vermut>
  1 + 1 = 10
  - bianca
    
    2015-02-20 16:20
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    2015-02-20T15:13:39 Muffi
    Ich würd mal vermuten, dass der Dumper bei jeder sub DUMMY reinschreibt.
    
    Ja, das ist auch meine Beobachtung. Benutze den Data::Dumper auch öfter und Code wird bei mir auch immer so dargestellt.
    10 print "Hallo"
    20 goto 10
  - betterworld
    
    2015-02-21 01:55
    User since
    2003-08-21
    2614 Artikel
    ModeratorIn
    
    Man kann Dumper auch dazu bringen, Code auszuspucken.
    
    Code (perl): (dl )
    
    perl -MData::Dumper -we '$Data::Dumper::Deparse++; my $coderef = sub { print 42 }; print Dumper $coderef'
    
    Lieblingsmodule: IPC::System::Simple, Path::Class
- +7 replies
- GwenDragon
  
  2015-02-20 16:42
  
  User since
  2005-01-17
  14760 Artikel
  Admin1
  
  Das ist das Quellschlüsseldingens (ohne Analoge Hallizinelle gefunden) sagt Enzühklopädieeeh*. Bittääh selberr ansähn: https://metacpan.org/source/SMUELLER/Data-Dumper-2...
  
  *Ijon Tichy (Raumpilot in Großes Kosmos) meint das! Nicht das verschuppichte Gwendrachän. So, ich muss nun fligähn weiterr, ist sich Ksmologisches Konferenz mit Professor Tarantoga und neues Robotär, kaputtiches.
  Last edited: 2015-02-20 17:10:37 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +6 replies
  - Raubtier
    
    2015-02-20 17:16
    
    User since
    2012-05-04
    1076 Artikel
    BenutzerIn
    
    2015-02-20T15:42:26 GwenDragon
    Das ist das Quellschlüsseldingens (ohne Analoge Hallizinelle gefunden) sagt Enzühklopädieeeh*. Bittääh selberr ansähn: https://metacpan.org/source/SMUELLER/Data-Dumper-2...
    
    *Ijon Tichy (Raumpilot in Großes Kosmos) meint das! Nicht das verschuppichte Gwendrachän. So, ich muss nun fligähn weiterr, ist sich Ksmologisches Konferenz mit Professor Tarantoga und neues Robotär, kaputtiches.
    
    Hä? Parse error. Was willst du mir damit sagen?
    - +5 replies
    - GwenDragon
      
      2015-02-20 17:55
      
      User since
      2005-01-17
      14760 Artikel
      Admin1
      
      Du wolltest wissen wo das DUMMY herkommt. Es ist in Data::Dumper so hartkodiert wie im Link zu CPAN zu sehen.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +4 replies
      - Raubtier
        
        2015-02-20 18:01
        
        User since
        2012-05-04
        1076 Artikel
        BenutzerIn
        
        Ok, danke, das war der zweite Teil der Frage.
        
        Interessanter ist: warum geht das überhaupt, d.h. warum kann ich eine Coderef von etwas bekommen, das gar nicht da ist? Und wenn später irgendwie die Funktion importiert wird, ist die vorher geholte Coderef auf magische Weise so gesetzt, dass die importierte Funktion gerufen wird.
        
        GUIfreund
        
        2015-02-20 19:40
        
        User since
        2011-08-08
        559 Artikel
        BenutzerIn
        
        2015-02-20T17:01:29 Raubtier
        Warum geht das überhaupt, d.h. warum kann ich eine Coderef von etwas bekommen, das gar nicht da ist?
        
        SO viel ich weiß, war Data::Dumper ursprünglich dafür gedacht, beliebige Perl-Datenstrukturen zu schreiben und später wieder herstellen zu können.
        Gruß
        GUIfreund
        
        +2 replies
        
        Linuxer
        
        2015-02-20 19:41
        
        User since
        2006-01-27
        3890 Artikel
        HausmeisterIn
        
        Ohne die Interna wirklich zu kennen, spinne ich mir das so zusammen:
        
        Ich vermute, dass bei der Referenzierung bereits ein Eintrag in der Symbol-Tabelle für die benannte (aber nicht existente Sub) erzeugt wird. Wird dann später diese sub definiert oder importiert, wird sie an der zuvor schon festgelegten Stelle in der Symbol-Tabelle abgelegt.
        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
        
        2015-02-21 00:12
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        das interessante finde ich, dass das wohl schon zur compile-time passiert.
        
        Code (perl): (dl )
        
        1 2 3 4
        
        my $test = $main::{subname} // 'undef'; say "subname: $test"; __END__ subname: undef
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10
        
        my $test = $main::{subname} // 'undef'; say "subname: $test"; my $subref = \&subname; $test = $main::{subname} // 'undef'; say "subname: $test"; __END__ subname: *main::subname subname: *main::subname
        
        wogegen das hier:
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11
        
        my $test = $main::{subname} // 'undef'; say "subname: $test"; my $name = "subname"; my $subref = \&{$name}; $test = $main::{subname} // 'undef'; say "subname: $test"; __END__ subname: undef subname: *main::subname
        
        zur runtime passiert.
        Last edited: 2015-02-21 00:18:03 +0100 (CET)
        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 2015-02-20 15:51.