Discussion :

[perlgirl]

Coucou

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 :

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

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 . 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 :

Perlgirl

[mat21]

Salut,

tu peux faire un truc de ce style

Code :

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

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

[Mr6]

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

Code :

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

$res = $req_ex -> fetchrow

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

@+
Mr6

[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???

Perlgirl

[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

[perlgirl]

Merci, ca marcheuuuu

Perlgirl