如何在Perl中确定Mysql连接ID？

Question

我想了解,我的模块是否与MySQL共享DBI连接或没有.我想确定他们的连接ID.可能有更好的解决方案(我想知道它们),但第一个问题仍然是知道连接ID.

Answer 1

您可以使用该CONNECTION_ID功能,例如:

my ($id) = $dbh->selectrow_array('SELECT CONNECTION_ID()');