Récupérer les données d'une ligne et d'une colonne d'une table en utilisant Perl DBI.

Question

J'essaie de récupérer des données comme ( Select 1 from table ) qui renvoie des données avec une ligne et une colonne.

Je ne veux pas utiliser $sth->fetchrow_array pour récupérer les données dans le tableau. Existe-t-il un moyen de collecter les données dans une variable scalaire directement ?

Answer 1

fetchrow_array retourne une liste - il est impossible de retourner un tableau - et vous pouvez l'assigner à n'importe quoi sous forme de liste comme un my() .

my $sth = $dbh->prepare($stmt);
$sth->execute();
my ($var) = $sth->fetchrow_array()
   and $sth->finish();

Ou vous pouvez simplement utiliser

my ($var) = $dbh->selectrow_array($stmt);

Answer 2

my ($value) = @{$dbh>selectcol_arrayref("select 1 from table")}

ou mieux

my ($value) = $dbh>selectrow_array($statement);