perl - 确定$ sth是否有行而不消耗它？

Question

使用DBI是否可以确定SELECT语句的已执行语句句柄是否返回任何行而不从中获取行？

IE。就像是:

use DBI;
...
my $sth = $dbh->prepare("SELECT ...");
$sth->execute;

if (..$sth will return at least one row...) {
  ...
} else { 
  ...
}

而且我想执行测试 $sth will return at least one row而不对 $sth执行任何提取方法。

注意-我不需要确切的行数(即 $sth->rows)，我只需要知道 $sth->rows是否会> 0。

Answer 1

$ sth-> rows仍然是您的最佳选择。如您所说，只需检查它是否大于0。

if ($sth->rows > 0){
  # magic here!
}

除了! DBI文档说，这对于选择语句是不可靠的，直到所有行都已被获取。无法确定要预先获取多少行的方法。如果您需要了解此建议，则建议先做一个

select count(*) from <table>

参见 this section of the DBI documentation。