perl的编码，好头大啊，求指教啊

pigkingone

$v=pack('U',\xbfec);
$v=encode('gb2312',$v);
$v=decode('gb2312',$v);
$d=decode('gb2312','快');


请问，$v和$d为何不相等啊。。。。
如果能给多解释点更感谢了啊。

bfec是快的bg2312十六进制

pigkingone

好久没人回复了。。。自己顶一下

zhlong8

$v=pack('U',\xbfec); 这旦 \xbfec 是语法错误啊，应该写做 0xbfec，没用 use strict; use warnings;
这里的 U 表示后面的数字是字符的 unicode 编码，你给个 GBK 的怎么可能正确？

encode 'xxx', $str; 意思是把字符串从 utf8 转码为 xxx
decode 'xxx', $bytes; 意思是把字符串从 xxx 转成 utf8
这两个函数都默认了 Perl 内部对 unicode 用 utf8 表示，或许改成 encode 'utf8', 'xxx', $str;  decode 'xxx', 'utf8', $bytes; 要容易理解点。

pitonas

回复 3# zhlong8

这个有意思
学习了！
   

pigkingone

谢谢了。有道理。一会去试试

523066680

pigkingone 发表于 2014-08-14 15:34
谢谢了。有道理。一会去试试

不是吧 2012年的帖子，一会去试试……  下次是2016年吗

pigkingone

哈哈。这个问题很久没人回答。没想到突然发现有人回答