Perl en CGI?

**Jim_Nastiq** · 10/04/2006, 11h43

salut,

voila je vais pas y aller par 4 chemin j'ail u plein de post sur le sujet mais soit c'est pas clair pour moi soit je comprend tout simplement rien

!

En fait j'ai easyphp 1.8 ! j'ai installé a partir d'actvie state perl sous windows! et je souhaite utiliser mes scripts perl en cgi sur le serveur apache! mais quand je me rends a :

http://localhost/toto/index.htm

j'ai bien ma page qui s'affiche mais quand je click sur le bouton qui devrait lancer mon script mon code source s'affiche! je suppose que le cgi n'est pas configurer.

merci de m'aider parce que j'ai deja lu quantité de truc pas clair qui on mis un bordel fou dans mon petit cerveau

Invité · 10/04/2006, 13h09

Ton CGI doit être exécutable.
Sinon, regarde plutôt la config Apache

**Jim_Nastiq** · 10/04/2006, 13h10

quand tu dis que mon CGI doit etre executable c'est a dire?
sinon merci pour le lien

Invité · 10/04/2006, 13h15

Sous Win32, il doit l'être par défaut.
Je pense que ton problème vient simplement de ta config apache, il faut que tu actives l'exécution des cgi.

**Jim_Nastiq** · 10/04/2006, 13h18

ok merci de ton aide j'ai lu attentivement le lien et j'ai configurer le serveur apache pour executer le script perl en cgi!
par contre maintenant j'ai une erreur 403

You don't have permission to access /get_file.pl on this server

je pense qu'il faut gerer les permissions dans apache , je vais chercher ca sur le site apache.org!

encore merci kuzco

Invité · 10/04/2006, 13h21

regarde plutôt les droits NTFS par rapport au compte qui démarre le service apache.

**Jim_Nastiq** · 10/04/2006, 13h27

oui j'i deja regarder mais les droits sont tous autorisé!
et le log erreur apache m'indique :

Options ExecCGI is off in this directory: c:/toto/htdocs/get_file.pl

alors que mon script est dans le dossier c:/toto/cgi-bin

pourtant la config dans httpd.conf indique bien le chemin vers les scripts cgi !

Invité · 10/04/2006, 13h30

Sur les dossiers autres que cgi-bin, l'exécution de cgi n'est pas permise. Il faut explicitement l'activer dans la config par l'option ExecCGI dudit dossier.
Mais ça, tu as dû t'en rendre compte

**Jim_Nastiq** · 10/04/2006, 13h33

tu veux dire que je doit rajouter l'option execcgi a tout les repertoire dans le httpd.conf ?

Invité · 10/04/2006, 13h35

non, je dis que si tu décides de placer tes cgi dans le dossier tutu par exemple, tu dois mettre ExecCGI pour ce dossier.

Par sécurité, je te conseille de placer TOUS tes cgi dans cgi-bin. C'est une bonne habitude à avoir.

**Jim_Nastiq** · 10/04/2006, 13h37

c'est mon cas ils sont tous dans cgi-bin ! et j'a ibien mis l'option execcgi mais toujours ces problemes de droits !

**Jim_Nastiq** · 10/04/2006, 14h28

c'est bon le probleme de droit a l'air OK ! maintenant j'ai le droit a "la page est introuvable" c'est rassurant

Invité · 10/04/2006, 14h37

On avance... 8)
Est-ce que ta page html appelle le script au bon endroit ?
Quel est ton shebang ?

**Jim_Nastiq** · 10/04/2006, 15h35

pour l'endroit de l'appel dans la page html je met :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<form method="get" action="get_file.pl" ENCTYPE="multipart/form-data" >

mais maintenant que tu me dit ca! j'ai comme envie de mettre le chemin dans action du genre cgi-bin/get_file.pl...

Invité · 10/04/2006, 15h54

Envoyé par Jim_Nastiq

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<form method="get" action="get_file.pl" ENCTYPE="multipart/form-data" >

mais maintenant que tu me dit ca! j'ai comme envie de mettre le chemin dans action du genre cgi-bin/get_file.pl...

Oui, met /cgi-bin/get_file.pl

**Jim_Nastiq** · 10/04/2006, 16h33

je vais toutes les enchainer les erreurs, ca me fait marrer!
maintenant internal server error

! plus j'avance plus je m'approche de la reussite

**Jeh** · 10/04/2006, 16h43

C'est que tu as une erreur sur ton cgi.
Pour voir plus précisément de quoi il s'agit va voir dans le fichier error.log d'apache dans le répertoire $APACHE_HOME/logs

Invité · 10/04/2006, 16h55

Si tu as cette erreur, c'est que ton cgi s'est bien exécuté. Maintenant, ton serveur est correctement paramétré. 8)

Par contre, ton cgi contient des erreurs, à toi de déboguer ! Au travail

Commence par un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

perl -c monscript.cgi

dans une invite de commandes, pour voir si tu as des erreurs de syntaxe.
Puis, vérifie que ton shebang pointe bien vers le bon perl.exe.

**Jim_Nastiq** · 10/04/2006, 16h55

oui en effet j'ai une erreur sur le script! j'ai recuperer le script sur un site, mais bon je vais essayer de trouver l'erreur ,a 1ere vue c'est la facon de recuperer le parametre du formulaire html en perl qui ne fonctionne pas!

l'erreur pointée est le "param"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

$File[$NumFile] = $req->param("FILE" . $NumFile);

je sais qu'en javascript un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

request.form("nomduchamp")

permet de recuperer le champ mais en perl et avec un fichier a la place d'un texte je ne sais pas encore comment faire! c'est reparti pour de la lecture intensive de page web!
merci Jeh

**Jim_Nastiq** · 11/04/2006, 11h08

Bon je suis désolé de vous embeter encore mais je m'en sort pas

!

j'ai tout vérifier ,shebang,syntax,liens,noms de variable, lu quantité de truc sur le module CGI de perl...

mais j'ai toujours cette Internal server error

dans le error log on me dit :

Premature end of script headers: c:/webserver/cgi-bin/get_file.pl
Can't call method "param" on an undefined value at c:\\WEBSER~1\\cgi-bin\\get_file.pl line 30.\n

voici mon code Perl(mon code html est tout bete un formulaire avec method=get ; ENCTYPE="multipart/form-data" et evidement action : monscript.pl )

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
#!c:/Perl/bin/perl -w
 
 
use CGI ;
 
 
#--------------------------------------------------------#
#------------------ Get the excel file -----------------#
#--------------------------------------------------------#
 
# Constantes
$NumFile = 1;
$Monupload = "";
 
# Répertoire d'arrivée des fichiers
$basedir = "htdocs";                 
# Autorisation des types de fichiers
$everythings = "no";                
# Extension acceptée
$accepte = ".xls";                
# Page de redirect
$namefile = "send_ok.html";                
# Nombre de boucle
$Nbboucle = 3;               
 
 
while ($NumFile != $Nbboucle) 
{
	# Récupération des données
	$File[$NumFile] = $req->param("FILE" . $NumFile); 
	my $filenotgood = "";
	if ($File[$NumFile] ne "") 
	{
		my $FileName = $File[$NumFile];
		$FileName =~ s!^.*(\\|\/)!!; 
		# Vérification de la validité de l'extension
		@thatisgood=split(/\+/, $accepte);
		# Vérification du fichier si toutes les extensions ne sont pas acceptés.
		if ($everythings ne "yes") 
		{
			for($moni=0;scalar(@thatisgood) > $moni;$moni++) 
			{
				if ((index(lc($FileName), $thatisgood[$moni]) != -1) || ($filenotgood eq "no")) 
				{
					$filenotgood = "no";
					if (index(lc($FileName), $thatisgood[$moni]) != -1)
					{
						$FileSave = "upload.xls";                 # 7
					}
				}
				else
				{
				$filenotgood = "yes";
				}
			}
		}
 
		# Récupération du fichier
		if ($filenotgood ne "yes") 
		{ 
			open (OUTFILE, ">$basedir/$FileSave"); 
			while (my $bytesread = read($File[$NumFile], my $buf, 1024)) 
			{ 
				print OUTFILE $buf; 
			} 
			close (OUTFILE); 
		}
 
	}
	$NumFile++;
}
 
 
 
print "Content-type: text/html\n\n";
print "<HTML><HEAD><META HTTP-EQUIV=\"REFRESH\" CONTENT=\"0; URL=" . $namefile . "\"></HEAD><BODY></BODY></HTML>";
exit;

si quelqu'un a le temps de jeter un oeuil, merci

Perl en CGI?

Web Perl

Discussions similaires

Partager

Partager