为什么这个 ISQL 命令不能通过 Perl 的 DBI 运行？

Question

不久前，我正在寻找 通过 isql 将值插入文本字段的方法 最终找到了一些适合我的加载命令。

当我尝试从 Perl 执行它时它不起作用。我收到语法错误。我尝试了两种不同的方法，但到目前为止都不起作用。

我在每个循环结束时打印出 SQL 语句变量，因此我知道语法是正确的，但只是无法正确理解。

这是我正在测试的最新代码片段：

foreach(@files)
{

$STMT = <<EOF;
load from $_ insert into some_table
EOF

$sth = $db1->prepare($STMT);
$sth->execute;

}

@files 是一个数组，其元素是管道分隔文本文件的完整路径/位置（例如 /home/xx/xx/xx/something .txt）

表中的列数与文本文件中的字段数匹配，并且类型检查正常（我已手动加载测试文件，没有失败）

我得到的错误是：

DBD::Informix::db prepare failed: SQL: -201: A syntax error has occurred.

知道可能导致的原因这个？

---

EDIT to RET's & Petr's answers

$STMT = "'LOAD FROM $_ INSERT INTO table'";
    system("echo $STMT | isql $db")

我必须将其更改为这样，因为 die 命令会强制非自然死亡，并且该语句必须用单引号引起来。

Answer 1

Petr 完全正确，LOAD 语句是 ISQL 或 DB-Access 扩展，因此您不能通过 DBI 执行它。如果你看一下手册，你会发现它对于 SPL、ESQL/C 等也是无效的语法。

目前尚不清楚是否必须使用 perl 来执行脚本，或者 perl 只是生成 SQL 的一种便捷方法。

如果是前者，并且您想要一个纯 Perl 方法，则必须准备一条 INSERT 语句（从它的外观来看，只涉及一个表？），然后使用 split 读取文件将其分成列并执行准备好的插入。

否则，您可以使用 perl 生成 SQL 并通过 DB-Access 执行它，可以直接使用 system 或将两者包装在 shell 脚本或 DOS 批处理文件中。

系统调用版本

foreach (@files) {
    my $stmt = "LOAD FROM $_ INSERT INTO table;\n";
    system("echo $stmt | dbaccess $database")
            || die "Statement $stmt failed: $!\n";
}

在批处理脚本版本中，您可以将所有 SQL 写入单个脚本中，即：

perl -e 'while(@ARGV){shift; print "LOAD FROM '$_' INSERT INTO table;\n"}' file1 [ file2 ... ] > loadfiles.sql
isql database loadfiles.sql

注意，仅当文件名包含空格或元字符（这是常见问题）时，有关文件名引号的注释才相关。

此外，isql 和 dbaccess 之间行为的一个关键区别是，当以这种方式执行时，dbaccess 不会因错误而停止，但 isql 会。要使 dbaccess 在出现错误时停止处理，请在环境中设置 DBACCNOIGN=1。

希望这有帮助。

Answer 2

这是因为您的查询不是 SQL 查询，而是一个 isql 命令，告诉 isql 解析输入文件并生成 INSERT 语句。

如果您考虑一下，服务器可能位于完全不同的计算机上，并且不知道您正在谈论什么文件以及如何访问它。

所以你基本上有两个选择：

1. 调用 isql 并将 LOAD 命令通过管道传递给它 -
2. 自己解析文件并生成 INSERT 语句非常难看

Answer 3

请注意，文件 Notes/load.unload 随 DBD::Informix 一起分发，并且包含有关如何使用 Perl、DBI 和 DBD::Informix 处理 UNLOAD 操作的指南。令我有些懊恼的是，我看到 LOAD 部分写着“TBD”（或多或少）。

正如其他人所说，LOAD 和 UNLOAD 语句被各种客户端工具伪造，看起来像 SQL 语句，但 Informix 服务器本身不支持它们，主要是因为从客户端计算机获取文件存在问题（也许一台 PC）到服务器计算机（可能是 Solaris 计算机）。

要模拟 LOAD 语句，您需要分析 INSERT INTO Table 部分。如果它列出了列（INSERT INTO Table(Col03, Col05, Col09)），那么您可以在加载数据文件中预期三个值，并且它们将进入这三列。您将准备一条语句“SELECT Col03, Col05, Col09 FROM Table”来获取列的类型。否则，您需要准备一条语句“SELECT * FROM Table”来获取列（及其类型）的完整列表。给定列名和列数，您可以创建并准备合适的插入语句：“INSERT INTO Table(Col03, Col05, Col09) VALUES(?,?,?)”或“<代码>插入表值(?,?,?,?,?,?,?,?,?)'。您可以（可以说应该）在第二个列中包含列名称。

准备好后，您现在已经解析了卸载的数据。 SQLCMD 程序中有一个文档，可从 IIUG Software Archive 获取（该文档已在比微软的同名新贵程序长很多）。这非常详细地描述了 UNLOAD 格式。 Perl 能够处理 Informix 使用的任何内容 - 见证随 DBD::Informix 分发的 load.unload 文件中的 UNLOAD 信息。

Answer 4

快速谷歌搜索 显示 load 的语法 在文件名两边加上引号。如果您将语句更改为：

load from '$_' insert into some_table

由于您的语句不使用占位符，因此您必须自己添加引号，而不是使用 DBI 引用功能。