mysql - 如何确定 Perl DBI 数据库处理程序的连接状态

Question

如何确定 Perl DBI 数据库处理程序的连接状态(连接是否打开)？类似 .NET SqlConnection.State == Open 的东西。可能是这样的

defined($dbh->do("some nop sql"))

但是找不到要使用的sql nop语句。

Answer 1

可以通过调用询问数据库句柄是否已连接

$dbh->ping();

一些 DB 驱动程序不实现 ping 但 DBD::mysql 实现。另一种方法是为 MySQL 运行空选择，如 select 1。我假设是 MySQL，因为这是你的问题的标记方式。其他数据库的答案会略有不同。