如何使用 Perl 和 DBI 将包含特殊字符的数据正确插入数据库字段？

Question

我有一个表单，与我想发布到数据库中的字段的本网站上的发布问题/评论不同。

但是，如果有人在其中放置诸如 @#;"| 之类的特殊字符，则失败或未正确插入。有没有一种方法可以将所述数据插入数据库，而 Perl 不会尝试将某些字符视为运算符？

Answer 1

您可以使用 quote 数据库处理方法。引用文档：

报价

$sql = $dbh->quote($value);
$sql = $dbh->quote($value, $data_type);

引用字符串文字以用作 SQL 语句中的文字值，
通过转义包含的任何特殊字符（例如引号）
在字符串内并添加所需类型的外引号
标记。

$sql = sprintf "从 bar WHERE baz = %s 中选择 foo", $dbh->quote("不要");

更好的做法是使用占位符并绑定值：

$dbh->do("INSERT INTO foo VALUES(?)", undef, "@#;|");