Klassenaufruf aus Variable erstellen? (Allgemeines zu Perl)

[thread]14917[/thread]

Klassenaufruf aus Variable erstellen?

Leser: 21

Articles: hide open all | hide show old branches

+13 replies
roooot

2010-04-07 14:04
User since
2008-03-03
276 Artikel
BenutzerIn
Hi Leute,
kurze Frage:
Ich habe 2 Variablen, die eine beschreibt den Klassennamen die andere die auszuführende Aktion. Wie kann ich daraus einen Aufruf erstellen.
Code (perl): (dl )

1 2 3 4

$foo = 'klasse'; # kleingeschrieben $bar = 'losgehts'; # soll werden zu new Klasse->losgehts;
Wie kann man das ganze Testen ob die Klasse existiert? eval?
Code (perl): (dl )

1 2

eval {use Klasse}; if($@) { print "Fehler: $@" }
So in etwa?

Danke für eure Hilfe.
Viele Grüße :)
- +3 replies
- pq
  
  2010-04-07 14:18
  User since
  2003-08-04
  12209 Artikel
  Admin1
  2010-04-07T12:04:31 roooot
  
  Code (perl): (dl )
  
  1 2 3 4
  
  $foo = 'klasse'; # kleingeschrieben $bar = 'losgehts'; # soll werden zu new Klasse->losgehts;
  
  ich wess nicht genau, was "new Klasse->losgehts" für eine syntax sein soll, daher nehme ich mal an, das "new" ist hier ein vertipper. dann geht das ganz einfach:
  
  Code (perl): (dl )
  
  "\u$foo"->$bar;
  
  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
  - +2 replies
  - roooot
    
    2010-04-07 14:24
    
    User since
    2008-03-03
    276 Artikel
    BenutzerIn
    
    Jop das new war falsch.
    
    Was macht dieses \u. Die Groß- und Kleinschreibung muss doch auch beachtet werden oder?
    Viele Grüße :)
    - pq
      
      2010-04-07 14:26
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      2010-04-07T12:24:22 roooot
      Was macht dieses \u.
      
      ist das eine frage?
      
      Code: (dl )
      
      1 2
      
      $ perl -wle'$foo = "foo"; print "\u$foo"' Foo
      
      Quote
      Die Groß- und Kleinschreibung muss doch auch beachtet werden oder?
      
      dazu ists ja da.
      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
- +9 replies
- pq
  
  2010-04-07 14:22
  User since
  2003-08-04
  12209 Artikel
  Admin1
  2010-04-07T12:04:31 roooot
  Wie kann man das ganze Testen ob die Klasse existiert? eval?
  
  Code (perl): (dl )
  
  1 2
  
  eval {use Klasse}; if($@) { print "Fehler: $@" }
  
  ob eine klasse existiert? das kannst du nicht wirklich prüfen bzw. willst du wohl eher nicht. du kannst prüfen, ob ein modul XY geladen werden kann, ja. aber ob dieses dann das package "XY" enthält, ist noch ne andere frage.
  nehmen wir also mal an, du möchtest prüfen, ob ein modul geladen werden kann. das gab es übrigens auch schon häufiger als frage hier im forum.
  dein beispiel mit "eval { use Klasse }" ergibt so keinen sinn, denn ein "use" wird nun mal immer zur compilezeit ausgeführt, auch wenn es in einem eval-block steht.
  entweder nimmst du string-eval
  eval "use Klasse";
  oder require
  eval { require Klasse };
  
  edit: benutzt eigentlich irgendwer dir suche? eine suche nach 'eval AND use' und sortierung nach datum ergibt bei mir gleich ein paar hilfreiche treffer.
  
  edit2: diskussion der suche bitte hier, damit nicht ewig dieselben sachen wieder und wieder durchgekaut werden:
  Suche
  warum schaffe ich es, was hilfreiches zum thema zu finden und ihr nicht?
  Last edited: 2010-04-07 15:21:53 +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
  - roooot
    
    2010-04-07 14:26
    
    User since
    2008-03-03
    276 Artikel
    BenutzerIn
    
    Alles klar, danke für die Erklärung es funktioniert jetzt ;)
    Viele Grüße :)
  - +4 replies
  - bianca
    
    2010-04-07 14:43
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    2010-04-07T12:22:43 pq
    benutzt eigentlich irgendwer dir suche?
    
    Ich äußerst ungern, Gründe hatte ich an anderer Stelle schon mehrfach ausgeführt.
    10 print "Hallo"
    20 goto 10
    - +3 replies
    - pq
      
      2010-04-07 14:47
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      ja, da wirst du nicht müde, das zu erwähnen. öfter erwähnen bringt aber nix.
      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
      - +2 replies
      - bianca
        
        2010-04-07 15:01
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        Ja, sorry, wenn Du eine Frage nicht ernsthaft stellst, solltest Du es kenntlich machen. Ansonsten sieh es bitte als Antwort auf Deine Frage.
        10 print "Hallo"
        20 goto 10
        
        pq
        
        2010-04-07 15:06
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        das war ernsthaft gemeint. ich fragte, ob irgendwer die suche benutzt. auf antworten "ich nicht, weil [gründe schon mehrmals erwähnt]" kann ich aber verzichten. einmal reicht. im übrigen komme ich ja gerade zu diesem thema sehr leicht zu hilfreichen ergebnissen.
        
        2010-04-07T13:01:17 bianca
        Ansonsten sieh es bitte als Antwort auf Deine Frage.
        
        ach tatsächlich ;-) ich hätte jetzt nicht gewusst, was es anders sein soll. wäre ich du, hätte ich es aber wohl als stichelei bezeichnet.
        
        also: du findest die suche scheisse, und das weiss ich. mehr brauchts von dir dazu nicht, danke dir.
        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
  - +3 replies
  - roooot
    
    2010-04-07 15:11
    
    User since
    2008-03-03
    276 Artikel
    BenutzerIn
    
    Ich benutze die Suche auch selten.
    Grund: Der Score ist mir nicht transparent genug. Beispielweise hat dieser Thread max 0,3 Punkte wobei es hier doch exakt um das Thema geht. Da sind wir auch schon biem nächsten Thema, wieso werden Themen nicht gebündelt? Es wird jeder Eintrag einzeln gelistet? Search only by titles ist da keine Abhilfte
    Viele Grüße :)
    - pq
      
      2010-04-07 15:14
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      dazu gibt es schon antworten.
      der score ist momentan in KinoSearch nicht dokumentiert, und gruppieren nach thread geht nicht, dazu müsste ich einen zweiten index anlegen. das sagte ich aber bereits.
      
      ich wiederhole mich: eine suche nach "eval AND use" brachte für mich hilfreiche ergebnisse, trotz dieser einschränkungen.
      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
    - pq
      
      2010-04-07 16:24
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      Splitted to suche oder nicht suche
      
      Original message by 'bianca':
      
      Quote
      psssst, das hatte ich teilweise schon früher geäuß...
      
      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 2010-04-07 14:04.