[sgbd] Perl-DBI

Version imprimable

15/11/2004, 17h29
perlgirl

[sgbd] Perl-DBI
Coucou :lol:

J'utilise le module perl-DBI pour interroger une base de données (postgresql) et traiter les données retournées par ma requete.

J'ai consulté de nbreuses docs, sur la maniere dont on stocke les données extraites et a chaque fois il y avait tjs la solution avec "fetchrow_array" qui permet de stocker dans un tableau chaque ligne retournée par la requete...

Cependant ma requete qui est de cette forme :
Code:

1 2 3 4 5 6 7 8 9 10 my $requete = "SELECT DISTINCT prenom FROM info_personne"; my $req_ex = $db->prepare($requete); $req_ex->execute(); while (@res = $req_ex -> fetchrow_array) { print "@res\n"; }
En fait tous les prenoms retournés se placent dans $res[0] puisque je demande de retourner un seul element...
$res[0] -> prenom1, prenom2, prenom3,etc...

mais moi ca m'arrange pas car comment separer chaque prenom contenu dans la premiere case du tableau :roll: . L'ideal aurait été que chaque prenom retourné se place dans une case du tableau :

$res[0] -> prenom1
$res[1] -> prenom2
$res[2] -> prenom3
etc...

Est ce que cela est possible :?:

:D Perlgirl :D

Salut,

tu peux faire un truc de ce style

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 
my $requete = "SELECT DISTINCT prenom FROM info_personne";
 
my $req_ex = $db->prepare($requete);
 
$req_ex->execute();
 
while (@res = $req_ex -> fetchrow_array) {
push @prenom, @res; 
} 
 
print $prenom[0];

ensuite tu travailles sur @data

16/11/2004, 07h29
Mr6

A la limite, pour que ton bout de code soit encore plus clair, utilise carrément

Code:

$res = $req_ex -> fetchrow

vu que tu sais que tu n'as qu'un seul résultat par ligne.

@+
Mr6
16/11/2004, 10h17
perlgirl

Ok merci pour vos reponses je vais voir ce que je peux faire avec vos solutions ;-).
Par contre il y a un truc qui m'echappe dans ta solution mat21, d'ou vient ton tableau @data dont tu me parles a la fin???

:D Perlgirl :D
16/11/2004, 17h22
mat21

re,

oui c'est vrai tu peux utiliser fetchrow.

perlgirl, je voulais dire @prenom désolé. c'est un lapsus des notations que j'utilise habituellement ;)
17/11/2004, 10h04
perlgirl

Merci, ca marcheuuuu

:D Perlgirl :D