mysql - 如何从 Perl 运行和链接 .sql 文件

Question

我正在寻找一种方法来实现 MySQL 和 Perl 来制作程序。我迷路的地方是我有一个 .sql 文件，它创建了 3 个表供 Perl 程序使用。你怎么：

1) 在 Perl 中执行文件 fileName.sql 来创建表

2）将这些创建的表链接到 Perl 程序中的可操作变量（例如能够将用户添加到其中一个表的示例）

Answer 1

在 Perl 中执行文件 fileName.sql 以创建表

通常您会提前设置数据库并使用命令行mysql客户端或 PHPMyAdmin 等 GUI 来加载 .sql 文件。

不过，您可以使用调用来system执行前者。

将这些创建的表链接到 Perl 程序中的可操作变量

Perl 中对数据库的低级访问通常通过DBI 模块处理。

根据每个表的变量获取某些东西需要 ORM。DBIx::Class是一个流行的选择。

Answer 2

在 Perl 中，您使用DBI数据库接口。在您的情况下，您还将使用DBD::MySQL驱动程序之类的东西。

关于这个主题有很多帮助（包括这个网站上的很多问题）。

至于 .sql 文件的具体问题，您可以采取几种方法，具体取决于您想要获得的花哨程度：

• 您可以在编写程序时将命令复制并粘贴到程序中。
• 您可以执行将运行 .sql 文件的外部程序（例如，使用system()）。
• 您可以以编程方式读取 .sql 文件并从程序中发送命令。一个模块可以帮助你解决这个问题（我SQL::Script在 CPAN 上找到，它看起来很有用，虽然我没有任何经验）。

我建议您选择一种方法，尝试一下，并询问您是否有任何具体问题。