如何在使用Perl的DBI :: ODBC时识别后端数据库

Question

我在接收DBI数据库句柄对象的模块中编写函数。通常，这是一个ODBC连接。我跑的时候：

print $dbh->{Driver}{Name};

我得到ODBC。如何判断ODBC连接引用的数据库类型？有时它是MySQL，有些是它的DB2或MSSQL。

版本：

• CentOS Linux 7.3
• Perl 5.16.3
• DBD :: ODBC 1.50
• unixODBC 2.3.1