perl – 在获取行时,DBI可以推断或了解数字列类型吗？

$dbh->SELEctrow_hashref('SELECT id,name FROM foos WHERE name = "bar"');

根据您的数据库驱动程序,您可以*在 bind_col中使用类型提示：

use DBI qw(:sql_types);

...

my $sth = $dbh->prepare('SELECT id,name FROM foos WHERE name = "bar"');
$sth->execute;

$sth->bind_col(1,undef,{
    TYPE => SQL_IntegeR,StrictlyTyped => 1,DiscardString => 1
});

while (my $hr = $sth->fetchrow_hashref) {
    say to_json $hr;
}

这会尝试将第一列(从一个索引编译)绑定到SQL_IntegeR类型,如果转换为任何值失败,则会引发错误.作为bohica notes,DiscardString属性是必要的,因为它“抛弃了数据的字符串部分(pv).”

*根据DBI文档：

根据this thread(虽然我无法验证它),DBD :: Oracle和DBD :: ODBC支持它,DBD :: Pg可能支持它,而DBD :: mysql则不支持它.我不确定其他车手.