执行失败：字符串值不正确：'\xD6sterl...' 使用 mariadb 和 perl DBD

我是一名新手 Perl 程序员，试图使用 DBI 将包含带有变音符号和其他非 ASCII 字符的电子邮件的文本缓冲区写入 joomla 数据库，但遇到了问题。

DBD::mysql::st execute failed: Incorrect string value: '\xD6sterl...' for column `lsv5webstage`.`xuxgc_content`.`fulltext` at row 1 at /home/alerts/scripts_linstage/AdvisoryTest.pm line 373.

我不太熟悉编码的工作原理，无法完全理解问题所在。这是一个带mariadb-10.3.12和joomla-3.9的fedora29系统。

显然，“\xD6”是“Sebastian �sterlund”中带有变音符号的 O。我读到一些关于 utf8 无法处理 4-char 的内容，但我不完全理解。

我在网上找到了以下参考资料，其中讨论了将编码类型从 utf8 更改为 utf8mb4，但所有表似乎都已经在使用该编码：

> SHOW VARIABLES WHERE Variable_name LIKE 'character\_set\_%' OR 
Variable_name LIKE 'collation%';
+--------------------------+--------------------+
| Variable_name            | Value              |
+--------------------------+--------------------+
| character_set_client     | utf8mb4            |
| character_set_connection | utf8mb4            |
| character_set_database   | utf8mb4            |
| character_set_filesystem | binary             |
| character_set_results    | utf8mb4            |
| character_set_server     | utf8mb4            |
| character_set_system     | utf8               |
| collation_connection     | utf8mb4_unicode_ci |
| collation_database       | utf8mb4_unicode_ci |
| collation_server         | utf8mb4_unicode_ci |
+--------------------------+--------------------+

我不确定它是否有帮助，但这是我在 Perl 代码中使用的插入语句：

    my $sql                 = <<EOF;
    INSERT INTO xuxgc_content (title, alias, introtext, `fulltext`, state, catid, created, created_by, created_by_alias, modified, modified_by, checked_out, checked_out_time, publish_up, publish_down, images, urls, attribs, version, ordering, metakey, metadesc, metadata, access, hits, language)
    VALUES ($title, "$title_alias", $introText, $fullText, $state, $catid, $created, $created_by, $created_by_alias, $modified, $modified_by, $checked_out, $checked_out_time, $publish_up, $publish_down, $images, $urls, $attribs, $version, $ordering, $metakey, $metadesc, $metadata, $access, $hits, $language);
    EOF

    my $sth = $dbh->prepare($sql);
    $sth->execute();
    db_disconnect($dbh);

$fullText 变量是从包含电子邮件正文的缓冲区填充的。在执行 INSERT 之前，我通过 quote() 运行它。

$fullText       = $dbh->quote($fullText);

我还尝试使用“SET NAMES utf8mb4;INSERT INTO Mytable ...;”它只是不喜欢这种格式。

这是用于连接数据库的完整函数：

sub db_connect () {
  my %DB        = (
    'host'  => 'myhost',
    'db'    => 'mydb',
    'user'  => 'myuser',
    'pass'  => 'mypass',
  );

  return DBI->connect("DBI:mysql:database=$DB{'db'};host=$DB{'host'}", $DB{'user'}, $DB{'pass'}, { mysql_enable_utf8mb4 => 1 });
 }

我不记得过去有过这个问题，而且这个脚本已经使用了很长一段时间了。

D6是十六进制Ö in CHARACTER SET latin1（以及其他几个）。

您已声明您的客户使用UTF-8（utf8mb4）编码，所以它向你吐口水。

请提供SELECT HEX(col), col ...看看是否D6进入数据库（因此insert问题）或其他问题（可能是获取/显示问题）。

另外，你还没有引用你的$fulltext字符串，因此您可能会遇到各种语法错误。

请不要盲目将字符串放入INSERT语句，但在放入它们时将其转义。

这里可能有一些有用的 Perl 提示：

    use utf8;
    use open ':std', ':encoding(UTF-8)';
my $dbh = DBI->connect("dbi:mysql:".$dsn, $user, $password, {
   PrintError => 0,
   RaiseError => 1,
   mysql_enable_utf8 => 1,  # Switch to UTF-8 for communication and decode.
});
# or {mysql_enable_utf8mb4 => 1} if using utf8mb4

并寻找绑定/引用/转义的技术。