Pas d'affichage du contenu SQLITE en CGI

Invité · 12/11/2018, 14h17

Bonjour,

J'utilise SQLITE et CGI (perl 5) sous Linux et Firefox.
Je veux afficher la liste des tables de ma base SQLITE dans un browser.

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
 
#!/usr/bin/perl -w
use DBI;
use CGI;
 
my $q = new CGI;
 
my $dbconnect = DBI->connect('DBI:SQLite:/tmp/DB1.sqlite');
print $q->header,
$q->start_html(-title=>'Tables');
print "<br>Avant balise ul<br>";
print $q->start_ul;
my $sel = $dbconnect->prepare("select name from sqlite_master  where type = 'table'");
$sel->execute;
while (my @row = $sel->fetchrow) {
  my $dt = $row[0];
  print $q->li($dt);
}
$dbconnect->disconnect();
print $q->end_ul;
print "<br>Apres balise ul<br>";
print $q->end_html;

Il n'y a pas d'erreur de syntaxe:
perl -c lectdb.pl
lectdb.pl syntax OK

Lorsque j'execute le perl en console: nickel
perl lectdb.pl

Code HTML :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Content-Type: text/html; charset=ISO-8859-1
 
<!DOCTYPE html
	PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
	 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>Tables</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
<ul><li>sqlite_sequence</li><li>extension</li><li>langage</li><li>encours</li><li>reference</li></ul>
</body>
</html>

Cependant, lorsque j’exécute le programme dans le browser, : rien ne s'affiche dans la boucle.
Pourtant, je n'ai pas d'erreur.

Page Web Affichée:

Avant balise ul

Apres balise ul

Code source de la page Web affichée.

Code HTML :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
<!DOCTYPE html
	PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
	 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>Tables</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
<br>Avant balise ul<br><ul></ul><br>Apres balise ul<br>
</body>
</html>

Je ne vois vraiment pas où se trouve mon problème. Si quelqu'un pouvait m'aider.
Merci

J'ai résolu mon problème: il s'agissait de SELINUX.

Pas d'affichage du contenu SQLITE en CGI

Web Perl

Discussions similaires

Partager

Partager