sql-server - "sp_spaceused" 在 perl 中只返回一个结果集

Question

当我在 SQL Server 编辑器中使用“sp_spaceused”时，它返回两个结果集。

IE

database_name, database_size, unallocated space

'Test', '25000.00 MB', '4510.67 MB' 

和

reserved, data, index_size, unused

'10741072 KB', '10007904 KB', '661728 KB', '71440 KB'

但是在 perl 脚本中它只返回一个。

前任：

my $query = "sp_spaceused";

my $sth = $dbh->prepare($query) ;
$sth->execute();

while ( my @row = $sth->fetchrow_array() )

{

    print " @row \n ";

}

输出：

database_name, database_size, unallocated space

'Test', '25000.00 MB', '4510.67 MB' 

有什么方法可以同时获取和存储结果集！

Answer 1

试试这个（取自这里）

do {
    while ( my @row = $sth->fetchrow_array() )
    {
        print " @row \n ";
    }
} while ($sth->{odbc_more_results});