SQL 服务器数据库连接使用 Perl DBI

Question

我正在尝试使用本地计算机上的 perl DBI/DBD 连接 SQL 服务器数据库，但遇到问题并收到错误消息：Lost connection to MySQL server at 'reading initial communication packet', system error: 0 at C:\Users\user12345\Desktop\PerlExamples\MyPerlExample2.pl line ...

现在，我可以远程连接到数据库服务器并且能够成功连接。另外，我什至运行带有 IP 地址和 SQL 服务器端口的 telnet 命令，所以 telnet 也成功了。我觉得我在这里尝试使用的输入参数出了问题。

下面的快照说明了 perl 代码和数据库详细信息，这里我想连接数据库 "XYZ"，如 screenshot 中所示。

Answer 1

您的连接字符串 $DSN 将驱动程序指向 mysql 数据库，将其更改为 MSSQL Server，如下所示：

$connectDB = DBI->connect("dbi:ODBC:Driver={SQL Server};Server=ServerIP_or_name;UID=$user;PWD=$password")

SQL 服务器数据库连接使用 Perl DBI

SQL server Database connection using Perl DBI

sql-server

perl

cgi