Script CGI : Afficher le résultat dans Firefox

Version imprimable

Bonjour,

Voici le code de mon script :

Code:

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
 
#!/usr/bin/perl 
use DBI;
use CGI;
 
$co = new CGI;
print $co->header;
 
$database="***";
$hostname="****";
$login = "***";
$mdp = "***";
 
$dsn = "DBI:mysql:database=$database;host=$hostname";
$dbh = DBI->connect($dsn, $login, $mdp) or die "Echec connexion";
 
$requete = "SELECT * FROM **** ";
$sth = $dbh->prepare($requete);
 
$sth->execute();
 
while(my @row = $sth->fetchrow_array){
print $row['0'];
}
 
$sth -> finish;
$dbh -> disconnect

Le code fonctionne parfaitement en executant cette commande en shell :
"perl -w sql.cgi"

Lorsque je le test sur Firefox 3.0, Rien ne s'affiche Pourquoi ? :?

Merci

13/09/2008, 18h49
Jedai

Citation:

Envoyé par fredob

Le code fonctionne parfaitement en executant cette commande en shell :
"perl -w sql.cgi"

Lorsque je le test sur Firefox 3.0, Rien ne s'affiche Pourquoi ? :?

Que veux-tu dire par le "tester sous Firefox" ? Tu as bien un serveur web, n'est-ce pas ?

--
Jedaï
13/09/2008, 20h47
fredob

Oui j'ai un serveur Web sous debian
=> Apache 2
=> Mysql Server 5
=> PHP 5

Je veux dire par "je test sur firefox" que j'appelle le script en tapant l'url http://192.168.2.166/cgi-bin/sql.cgi

Les scripts en php fonctionnent parfaitement bien et les connexions mysql en php fonctionnent bien également.

Les droits sur le fichier CGI sont : 777
13/09/2008, 21h28
Jedai
Rien du tout ne s'affiche ? Même pas une erreur ?
Que disent les logs d'Apache ?

Quelques petites erreurs à corriger également :
Code:

1 2 3 4 5 6 7 print $co->start_html('Page de test'); while(my @row = $sth->fetchrow_array){ print $co->p($row[0]); } print $co->end_html;
A moins que tu ne veuilles renvoyer du texte brut, mais dans ce cas il faut le dire dans le header.

--
Jedaï

Comment on l'indique dans le header ?

Code:

print "content-type : text/html\n\n";

Aucune erreur dans les logs.

1 fois sur 3 ceci s'affiche :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<html><head>
<title>500 Internal Server Error</title>
</head><body>
<h1>Internal Server Error</h1>
<p>The server encountered an internal error or
misconfiguration and was unable to complete
your request.</p>
<p>Please contact the server administrator,
 webmaster@localhost and inform them of the time the error occurred,
and anything you might have done that may have
caused the error.</p>
<p>More information about this error may be available
in the server error log.</p>
<hr>
<address>Apache/2.2.3 (Debian) PHP/5.2.0-8+etch11 Server at 192.168.2.166 Port 80</address>
</body></html>

Il faut indiquer quelque chose si on utilise "start_html" ?

14/09/2008, 01h18
Jedai

Il serait souhaitable que tu lises un peu la documentation du module CGI...
Par ailleurs, tu ne dois pas regarder les bons logs, ou tu ne m'as pas montré exactement le script que tu utilises.

--
Jedaï
14/09/2008, 14h13
fredob

Le scrit est telquel celui que j'utilise.

Je vais lire un peut et je vous dirais quoi. :king:

Voilà, j'ai enfin trouver une solution.
Tout fonctionne bien.

J'ai tout simplement remplacé :
Code:

1 2 3 while(my @row = $sth->fetchrow_array){ print $row['0']; }
par :
Code:

1 2 3 4 5 6 7 8 9 10 print "Content-type: text/html\n\n"; print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">', "\n"; print "<html><head><title>Répertoires de modules permis</title>\n"; print "</head><body>\n"; while(my @row = $sth->fetchrow_array){ print $row[0]."<br>"; } print "</body></html>\n";
Maintenant tout s'affiche dans Firefox, IE, ...

Merci pour l'aide :yaisse2:

14/09/2008, 15h15
Jedai
Ca m'étonnerait que ça marche si bien si tu as laissé la ligne

Code:

print $co->header;

Parce que ce que tu as écrit se résume à :
Code:

1 2 3 4 5 6 7 8 print $co->header, $co->start_html('Répertoires de modules permis'); while(my @row = $sth->fetchrow_array){ print $row[0]."<br>"; } print $co->end_html;
Je te conseille plutôt d'utiliser ce code (et n'oublie pas qu'il ne faut écrire qu'un seul header par script), il est plus court et plus facile à étendre.

--
Jedaï