Je migre un site sur un nouveau serveur, et j'ai, comme de par hasard des problèmes.
J'ai installé les modules PERL, un script hello world marche tout a fait, mais pour des script plus compliqués, internal server error.
le log indique
le début du fichier promo.cgi est
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Can't locate Locaflat.pm in @INC (@INC contains: /usr/local/lib/perl5/site_perl/5.8.6/i386-freebsd /usr/local/lib/perl5/site_perl/5.8.6 /usr/local/lib/perl5/site_perl/5.8.4/i386-freebsd /usr/local/lib/perl5/site_perl/5.8.4 /usr/local/lib/perl5/site_perl/5.8.3/i386-freebsd /usr/local/lib/perl5/site_perl/5.8.3 /usr/local/lib/perl5/site_perl/5.8.1/i386-freebsd /usr/local/lib/perl5/site_perl/5.8.1 /usr/local/lib/perl5/site_perl/5.6.1 /usr/local/lib/perl5/site_perl/5.005 /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/5.8.6/i386-freebsd /usr/local/lib/perl5/5.8.6 /usr/local/lib/perl5/vendor_perl/5.8.6/i386-freebsd /usr/local/lib/perl5/vendor_perl/5.8.6 /usr/local/lib/perl5/vendor_perl/5.8.4/i386-freebsd /usr/local/lib/perl5/vendor_perl/5.8.4 /usr/local/lib/perl5/vendor_perl/5.8.3/i386-freebsd /usr/local/lib/perl5/vendor_perl/5.8.3 /usr/local/lib/perl5/vendor_perl /usr/local/lib/perl5/5.00503 /usr/local/lib/site_perl .) at /usr/local/apache/cgi-bin/promo.cgi line 3. BEGIN failed--compilation aborted at /usr/local/apache/cgi-bin/promo.cgi line 3. [Wed May 3 09:22:15 2006] [error] [client 82.226.180.38] Premature end of script headers: /usr/local/apache/cgi-bin/promo.cgi
et voici locaflat.pm
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 #!/usr/local/bin/perl use Locaflat; use Locaflat::MoreMalist; local $PATH="../vhosts/locaflat.securesites.com"; %months=("Jan",1,"January",1, "Feb",2,"February",2, "Mar",3,"March",3,
quelqu'un a une idée d'ou pourrait venir ce probleme?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 # File: Locaflat.pm # # Author: Ioan Jimborean (nelutu@wan.ro) # # Description: Manages locaflat data. # package Locaflat; use strict; #require Locaflat::Util; BEGIN { use Exporter; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking $VERSION = 1.00; # if using RCS/CVS, this may be preferred $VERSION = do { my @r = (q$Revision: 2.21 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
merci d'avance
Partager