matmike
Bekanntes Mitglied
Hallo Leute,
ich habe ein Problem mit Perl und Apache:
Wenn ich ein Skript von Hand aufrufe auf der Kommandozeile, dann wird es korrekt ausgeführt. Rufe ich das Skript über den Apache ab, wird immer gemeldet, dass eine Routine nicht gefunden wurde, die in einem Modul steckt. Das Modul wurde jedoch korrekt eingebunden, hierüber meldet Perl keinen Fehler.
Fehler:
Einbindung des Moduls und Zugriff auf Funktion:
Kann mir bitte Jemand helfen?
Danke,
MatMike
ich habe ein Problem mit Perl und Apache:
Wenn ich ein Skript von Hand aufrufe auf der Kommandozeile, dann wird es korrekt ausgeführt. Rufe ich das Skript über den Apache ab, wird immer gemeldet, dass eine Routine nicht gefunden wurde, die in einem Modul steckt. Das Modul wurde jedoch korrekt eingebunden, hierüber meldet Perl keinen Fehler.
Fehler:
Code:
Serverfehler!
Die Anfrage kann nicht beantwortet werden, da im Server ein interner Fehler aufgetreten ist.
Fehlermeldung:
Undefined subroutine &ModPerl::ROOT::ModPerl::Registry::D_3a_Server_xampp_htdocs_test_index_2epl::printhttpheader called at D:/Server/xampp/htdocs/test/index.pl line 12. ,
Sofern Sie dies für eine Fehlfunktion des Servers halten, informieren Sie bitte den Webmaster hierüber.
Error 500
192.168.178.4
01/23/07 07:05:03
Apache/2.2.3 (Win32) DAV/2 mod_ssl/2.2.3 OpenSSL/0.9.8d mod_autoindex_color PHP/5.2.0 mod_perl/2.0.2 Perl/v5.8.8
Einbindung des Moduls und Zugriff auf Funktion:
Code:
use strict;
use cgimod;
#predefine variables for "use strict;"
my $template="D:/Server/xampp/htdocs/test/index.template";
my %substitutes;
my %formdata;
#print HTTP-header
cgimod::printhttpheader(1);
%formdata=cgimod::readcgiformpost();
$substitutes{'<!-- Text_Content -->'}.=''.%formdata."\n";
foreach my $key (keys %formdata){
$substitutes{'<!-- Text_Content -->'}.=''.$key.': '.$formdata{$key}."\n";
}
Kann mir bitte Jemand helfen?
Danke,
MatMike