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

【问题标题】：How can I correctly insert data containing special characters into a database field using Perl and DBI?如何使用 Perl 和 DBI 将包含特殊字符的数据正确插入到数据库字段中？
【发布时间】：2011-03-10 18:40:38
【问题描述】：

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

但是，如果有人在哪里放置特殊字符（例如 @#;"|）失败或没有正确插入。有没有办法在 Perl 不尝试将某些字符视为运算符的情况下将所述数据插入数据库？

【问题讨论】：

你有什么代码会中断？是的，有办法，但你没有提供足够的信息。
special Characters in Perl 的可能重复项
How can I protect against SQL injection attacks using Perl's DBI?的可能重复
@mose，试试这个：与第一次回答您的代码损坏问题的人争论不让您满意，并拒绝回答“向我们展示您的代码”，以便我们为您修复它.加油，欢迎来到 StackOverflow。
奇怪，我在$var 中得到了testing $pecial ch@racter's。您仍然没有显示中断的代码。这是一本精美的手册：perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators

标签： database perl textarea dbi

【解决方案1】：

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

报价

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

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

$sql = sprintf "SELECT foo FROM bar WHERE baz = %s", $dbh->quote("Don't");

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

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

【讨论】：