Bonjour,
je voudrais effectuer une requête SQLite avec des données saisie depuis une interface graphique ne Tk.
Quand j'entre cette commande dans la console j'obtiens le bon résultat mais, depuis mon programme en perl je n'obtiens pas ce que je veux.
Voici ma requete SQL :
Voici mon code perl :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 sqlite> SELECT quantitee FROM vins WHERE libelle='Leoville' AND millesime='1989' AND couleur='rouge'; 50 sqlite>
Et voici le resultat du programme :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 print "libelle=$_[1] AND millesime=$_[2] AND couleur=$_[3]\n"; my $RequeteSQL = <<"SQL"; SELECT quantitee FROM vins WHERE libelle='$_[1]' AND millesime='$_[2]' AND couleur='$_[3]' SQL my $select = $connect->prepare($RequeteSQL); $select->execute() || die "\nechec de la requete\n"; print "le resultat est : ", $select->rows , "\n";
je devrais obtenir 50 mais j'obtiens 0. Je ne comprend vraiment pas pourquoi. J'ai supposé une erreur au niveau des quotes pour les variables mais je n'y crois pas trop.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 libelle=Leoville AND millesime=1989 AND couleur=rouge le resultat est : 0
Est-il possible qu'il y ai un problème de casse ?
Partager