[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [linux] [perl/PgSQL] array dans une colonne
On Tuesday 27 November 2001 22:41, you wrote:
> Salut à tous,
>
> Quand on est dans pgsql, il est possible de définir une array et d'y passer
> des données: create table test (te text[]);
> insert into test (te) values ('{"tes\n\t r\n"}');
>
> Bon, avec perl, je fait la même chose via la prise d'un fichier et
> Pg::connectdb. open(OUTPUT, "commande 2>&1|");
> while(<OUTPUT>) {
> @test = <OUTPUT>;
> }
>
Il y a au moins un problème dans ta lecture :
si tu veux accumuler les lectures de OUTPUT, il faut utiliser push (@test est
comme une pile dans laquelle tu insères à chaque tour un résultat), chomp
enlève le LF final.
while(<OUTPUT>) {
chomp;
push($_,@test);
}
for (my $i=0; $i<=$#test; $i++) {
print "$i: $test[$i] \n";
}
--
Bon amusement,
Alain
+--------------------------------------------------------------------------------------
| Dr Alain EMPAIN Bioinformatique, Génétique Moléculaire B43,
| Fac. Méd. Vétérinaire, Univ. de Liège, Sart-Tilman / B-4000 Liège
| Alain.EMPAIN@ulg.ac.be
| WORK:+32 4 366 3821 Fax: +32 4 366 4122 GSM:+32 497 701764
| HOME:+32 85 512341 -- Rue des Martyrs,7 B-4550 Nandrin
[ Soyez précis dans vos sujets svp afin de déterminer directement ]
[ le type de demande... ]
[ Pour vous (dés)inscrire, aller sur http://unixtech.be/ml.php ]
[ Archives de la mailing list: http://archives.unixtech.be/linux/ ]
[ http://unixtech.be Contact: listmaster@unixtech.be ]