perl - 使用Perl DBI从表中获取一行一行和一列的数据

Question

我正在尝试获取像(Select 1 from table)这样的数据，该数据返回一行和一列的数据。

我不想使用$sth->fetchrow_array方法将数据检索到数组中。有什么方法可以将数据收集到标量变量直角中？

Answer 1

fetchrow_array返回一个列表(不可能返回一个数组)，您可以将其分配给任何list-like，例如my()。

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

或者你可以简单地使用

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