插入后的 Perl 和 MySQL UTF-8 格式错误的字符

Question

我有一个 UTF-8 编码的 XML 文件。我使用Perl 解析文件（使用XML::Simple 模块）。我想将解析后的代码放入 MySQL 表中，它也编码了 utf8（确切地说是 utf8_generic_ci）。一切都很好，但有两个字符出错（通常是 ő 和 ű 及其大写对 ŐŰ）。

这是我的 perl 代码：

use strict;
use warning;
use utf8;
use XML::Simple;
use DBI;

my $db = DBI->connect("dbi:mysql:dbname=$dbname;host=$host;port=$port",
         $user, $passwd, {mysql_enable_utf8 => 1}) || die $DBI::errstr;

my $ref = XMLin("file.xml");

for ( my $i = 0; $i < scalar(@{$ref->{"PRODUCTS"}}); $i++ ) {
    my $name = $ref->{"PRODUCTS"}[$i]->{"NAME"};
    # some changes on the $name, for example removing whitespaces, etc.
    $db->do("INSERT INTO products (productname) VALUES ('".$name."');");
}

这是我的 mysql 表结构（SHOW CREATE TABLE products; 输出）：

| products | CREATE TABLE `products` (
  `id` bigint(20) unsigned NOT NULL AUTO_INCREMENT,
  `productname` varchar(255) NOT NULL DEFAULT '',
  PRIMARY KEY (`id`),
) ENGINE=InnoDB AUTO_INCREMENT=1 DEFAULT CHARSET=utf8;

我认为一切都在 UTF-8 中。如果我看到源 XML 文件，那么 őű 字符很好。但是在mysql插入之后他们出错了。其他口音也不错。

知道是什么问题吗？

Answer 1

您的代码中有错字，应该是：

{ mysql_enable_utf8 => 1 }  

另外，你应该绑定 SQL 参数：

$db->do("INSERT INTO products (productname) VALUES (?)", undef, $name);

最后，this SO question 可能会帮助你