如何将Perl变量插入Sqlite3

Question

我想使用Perl DBI将值插入Sqlite3表。 我能够毫无问题地插入硬编码值。 当我尝试使用perl变量时，出现错误“ DBD :: SQLite :: db失败：没有这样的列：”

这有效：

$dbh->do("insert into Gene values (12, 'AAAAAA', 66, 86, 76)");

但是这段代码

$dbh->do("INSERT INTO Gene values (NULL, $sequence, $siteNumber, $begin, $length)");

引发错误

DBD::SQLite::db do failed: no such column

Answer 1

当然，您应该始终prepare并execute SQL语句，并对变量值使用占位符。

试试这个代码

my $sth = $dbh->prepare('INSERT INTO Gene VALUES (?, ?, ?, ?, ?)');
$sth->execute(undef, $sequence, $siteNumber, $begin, $length);

Answer 2

您的问题将出在$ sequence上，这需要在insert语句中引用有效的SQL字符串文字。 结果，它以为您尝试引用的是称为AAAAAA的列，而不是您想要的字符串“ AAAAAA”。 Perl的字符串内插不会为您添加引号。

占位符和$ dbh-> prepapre是到目前为止最可靠的解决方案（例如，如果您的字符串包含引号''$ dbh-> prepare已经正确编码了，该怎么办）。