@INC Erweitern in httpd.conf (gelöst) (mod_perl und Apache)

[thread]19465[/thread]

@INC Erweitern in httpd.conf [gelöst]

Leser: 15

Articles: hide open all | hide show old branches

+4 replies
rosti

2015-01-16 17:53

User since
2011-03-19
3196 Artikel
BenutzerIn

hi, nach langer, langer Zeit bin ich mal wieder an mod_perl ;)

Also, wenn ich mit PerlResponseHandler MyModPerl::Test ersteinmal 'den Fuß in der Tür' habe, kann ich mit use lib() weitere Pfade setzen. Schöner wärs freilich, ich könnte das schon vorher machen, Idee?

Schöne Grüße.
- +2 replies
- pq
  
  2015-01-16 18:47
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  mit PerlSetEnv und PerlPassEnv geht das (PERL5LIB)
  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
    
    2015-01-17 00:56
    User since
    2011-03-19
    3196 Artikel
    BenutzerIn
    
    Danke, wa da nun endlich geht bei mir ist:
    
    Code: (dl )
    
    1 2
    
    PerlOptions +Parent PerlSwitches -Id:/home
    
    Feierabend ;)
- rosti
  
  2015-01-17 09:06
  User since
  2011-03-19
  3196 Artikel
  BenutzerIn
  Noch eine Frage zum Stil in Verbindung mit mod_perl:
  
  Meine Subklassen erben von meinem PerlResponseHandler MyModPerl::FWNG; Es gibt mehrere Subklassen, in denen ich das mit use base qw(MyModPerl::FWNG); deklariere.
  
  Möglich wäre eine Vorwärtsdeklaration, weil ja alle Klassen von UNIVERSAL erben:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6
  
  package MyModPerl::FWNG; # ... require "$class.pm"; # Je nach Request-URL die Subklasse unshift @UNIVERSAL::ISA, __PACKAGE__; # in der Subklasse kein use base ... notwendig
  
  Oder so?:
  
  Code (perl): (dl )
  
  1 2
  
  no strict 'refs'; unshift @{$class."::ISA"}, __PACKAGE__;
  
  Macht das jemand oder vergessen wir das lieber?
  
  PS: Ich schreibe gerade mein Framework für mod_perl ins Reine. Bei Interesse werde ich alle Sourcen public machen.
  
  PSPS: Ich werde KEINE der beiden "Vorwärtsdeklarationen" anwenden und schön ordentlich ein use base qw() einbauen :)
  Denn genau davon profitiert mein FWNG: Es ist, verglichen mit anderen Frameworks extrem übersichtlich. Keine schmutzigen Hacks ;)
  
  Nochn Edit: Verlockend sind die Zeilen
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  # im PerlResponseHandler oder in der main # wen die Subklasse für die Response feststeht: no strict 'refs'; @{$class."::ISA"} = (__PACKAGE__); use strict;
  
  hinsichtlich Kompatibilität meines Perl-Frameworks. Das könnte entweder in der main notiert sein oder im PerlResponseHandler. Eine Migration vom reinen CGI-Betrieb zu mod_perl oder umgekehrt würde dann nur noch den Austausch der Basisklasse erfordern, alles Andere, wie Konfigurationsdateien und die Dateien für die Subklassen bleiben unverändert. Die Basisklasse ist entweder die package main oder die dem PerlResponseHandler entsprechende Package, zu ändern ist lediglich die Serverkonfiguration und das ist auch nicht weiter kompliziert.
  
  Als einen schmutzigen Hack würde ich obenstehende Zeilen nicht bezeichnen, ein use base macht auch nichts anderes, nur halt andersherum.
  Last edited: 2015-01-18 09:20:40 +0100 (CET)

View all threads created 2015-01-16 17:53.