DBI访问数据表，如何取知道没有返回数据？

ibmxp

$DBI::err没有返回值，
判断@row吗？

ibmxp

在家都不用perl来访问数据库吗？
$dbh->;do( "update table set field='XXX' where field2='XXX'";
当无记录给update时$DBI::err也没有返回值，不知为什么？该如何判断呢？

welbird

或者你这样做
$sth=$dbh->;prepare("update............................" or die $!;
$rc=$sth->;execute or die $!
其中$rc就是返回的行数。
建议看看dbi的文档。

ibmxp

谢谢！

ibmxp

原帖由 "welbird" 发表：
或者你这样做
$sth=$dbh->;prepare("update............................" or die $!;
$rc=$sth->;execute or die $!
其中$rc就是返回的行数。
建议看看dbi的文档。

对于update语句可以这样判断,但对于select语句，这样无法知道结果，DBI文档也是这么写的，只返回-1,而有的时候我们确要对再某表里无记录时作特殊处理，如果用fetch的话，比较麻烦;而C嵌sql可以判断sqlcode来知道，perl就不能吗，不知有没有其它方法？？？

welbird

这点的确比较恼火
我都是这样解决的。
$sth=$dbh->;prepare("select count(*) from table........."
$sth->;execute;
$rc=$sth->;fetch; #得到匹配行数
--------
然后再正常的select
这样增加了数据库的负担。