Discussion :

[tony_95]

Bonjour,

je souhaiterais exécuter une série de requête SQL différente à l'aide d'une boucle et d'un tableau contenant différentes valeurs (en l'occurence ici, les noms de mes tables SQL). Pour cela, j'ai besoin de mettre une variable dans ma requête au lieu de l'écrire de manière statique.

Bref voici la partie de mon code pour comprendre ce que je veux faire

Code :

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

1
2
3
4
5
6
7
8
9
my @tables = ("equipements","users","liaisons");
 
foreach my $tables_master ($tables){
 
my $enregistrements_master = $dbd_master->prepare('SELECT id FROM' .$tables_master)
or die 'Impossible de préparer la requête : ' .$dbd_master->errstr;
$enregistrements_master->execute
or die 'Impossible d\'exécuter la requête : '.$enregistrements_master->errstr;
$enregistrements_master->rows;

... et me dit que j'ai une erreur de syntaxe, sauf que je ne connais pas la syntaxe avec une variable, et je ne trouve pas la solution dans les cours perl...

Code :

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

1
2
DBD::mysql::st execute failed: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1 at test_replication_beta.pl line 41.
Impossible d'exécuter la requête : You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1 at test_replication_beta.pl line 41.

[djibril]

Code :

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

'SELECT id FROM' .$tables_master

Il manque un espace après le FROM, du coup ta requête SQL est incorrect.

[tony_95]

J'ai mis un espace entre le FROM et le ' mais j'ai toujours la même erreur... :/

[djibril]

Peux-tu nous montrer ce que tu as fait ? Le message d'erreur est assez clair, erreur de syntaxe SQL. Donc soit ta requête SQL n'est pas bonne, soit tu crées une requête SQL incorrecte.

Code :

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

1
2
3
4
5
6
7
8
9
my @tables = ("equipements","users","liaisons");
 
foreach my $tables_master (@tables) {
  my $requete = 'SELECT id FROM ' . $tables_master;  
  my $enregistrements_master = $dbd_master->prepare($requete)
    or die 'Impossible de préparer la requête : ' .$dbd_master->errstr;
  $enregistrements_master->execute
    or die 'Impossible d\'exécuter la requête : '.$enregistrements_master->errstr;
  $enregistrements_master->rows;

[tony_95]

Ok c'est bon ça marche... Il manquait effectivement un espace, mais je faisais une autre erreur qui se situait au niveau de ma boucle (et donc générait une mauvaise requête...)

Il fallait écrire

Code :

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

foreach my $tables_master (@tables){

...et non pas

Code :

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

foreach my $tables_master ($tables){

Merci pour ton aide et merci pour les cours pour apprendre le programmation Perl : http://perl.developpez.com/cours/ .