Javascript 使用encode_json后,重音字符将被双重编码
我在Javascript 使用encode_json后,重音字符将被双重编码,javascript,mysql,ajax,perl,utf-8,Javascript,Mysql,Ajax,Perl,Utf 8,我在use json::XS qw(encode_json)中遇到了encode_json函数的问题。我们有一个以Perl、JavaScript、jQuery和MySQL为后端的基于web的项目 在应用程序的特定屏幕中,用户名称被扭曲 问题是用户名是西班牙语的,并且带有重音字符。 我们保存DB的表是旧表,有字符集拉丁1,但是当我获取数据时,我使用cast和convert,并将其编码为UTF-8格式 select CONVERT(CAST(CONVERT(u.last_name USING la
use json::XS qw(encode_json)中遇到了encode_json函数的问题代码>。我们有一个以Perl、JavaScript、jQuery和MySQL为后端的基于web的项目
在应用程序的特定屏幕中,用户名称被扭曲
问题是用户名是西班牙语的,并且带有重音字符。
我们保存DB的表是旧表,有字符集拉丁1,但是当我获取数据时,我使用cast和convert,并将其编码为UTF-8格式
select CONVERT(CAST(CONVERT(u.last_name USING latin1) AS BINARY) USING utf8) AS last_name from user where user_id = 'XXX'
在我存储数据库结果的结构中,数据看起来很好
{ last_name => Cvas García}
此结构被传递给呈现页面的javascript函数
$data_json = encode_json( $data )
当我打印$data\u json
时,重音字符再次失真
"user_permissions":[{"last_name":"Cvas GarcÃa"}]},
有人能帮我解决这个问题吗,用Mysql、perl或javascript代码?试试这个
use JSON;
use utf8;
use Data::Printer;
utf8::encode($data) unless (utf8::is_utf8($data));
p encode_json($data);
表的字符集是不相关的。MySQL将自动从表的编码转换为连接的编码。然后,您必须在Perl端对其进行解码,要么显式解码,要么将mysql\u enable\u utf8=>1
传递到connect
。我推荐后者
use utf8; # Source code encoded using UTF-8.
use open ':std', ':encoding(UTF-8)'; # Terminal expects/provides UTF-8.
use DBI qw( );
use JSON::XS qw( encode_json );
my $user_id = "...";
my $dsn = "...";
my $user = "...";
my $password = "...";
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.
});
my $name = $dbh->selectrow_array("
SELECT `last_name`
FROM `user`
WHERE `user_id` = ?
", undef, $user_id);
# Encoding being performed by "use open".
print(sprintf("%vX", $name), "\n"); # 47.61.72.63.ED.61
print($name, "\n"); # García
# Encoding being performed by "use open".
my $json = JSON::XS->new->encode([$name]);
print(sprintf("%vX", $json), "\n"); # 5B.22.47.61.72.63.ED.61.22.5D
print($json, "\n"); # ["García"]
binmode(STDOUT); # Override "use open".
my $json_utf8 = JSON::XS->new->utf8->encode([$name]); # aka encode_json([$name])
print(sprintf("%vX", $json_utf8), "\n"); # 5B.22.47.61.72.63.C3.AD.61.22.5D
print($json_utf8, "\n"); # ["García"]
谢谢你的建议。我没有得到与代码中提到的相同的输出。这是我得到的输出<代码>43.75.65.76.61.73.20.47.61.72.63.ED.61 Cuevas GarcÃa 5B.22.43.75.65.61.73.20.47.61.72.63.ED.61.22.5D[“Cuevas GarcÃa”]5B.22.43.75.65.76.61.73.20.47.61.72.63.C3.AD.61.22.5D[“Vas GarcÃa”
。。。保存到用户表中的初始数据本身是否损坏?十六进制表示字符串是正确的,因此您没有为终端指定正确的编码。ED
是拉丁1编码C3 AD
是utf8编码。