作者liyih ()
看板Perl
标题Re: [问题] Unicode转字串
时间Wed May 7 13:52:16 2008
※ 引述《LinusChen (retreat)》之铭言：
: 我想把16进位显示的unicode转为字串显示
: 例如:
: 6F225821 -> 汉堡
: 我试了几个方法都没有用
: 想请问各位前辈有没有人知道该怎麽做的
: 目前是在windows底下测试
: print encode("iso-8859-3",decode('utf-8', "0x6F22"));
: print encode("Big5",decode('utf-8', "0x6F22"));
: 结果直接输出 0x6F22
: 请问该怎麽做呢?
use Data::Dump;
my $mb = pack('C0U*', 0x6f22, 0x5821);
my $wc = pack('U*' , 0x6f22, 0x5821);
print Data::Dump->dump($mb), $/, $mb, $/;
print Data::Dump->dump($wc), $/, $wc, $/;
可以用 pack，再 dump 出来看看两者的差异。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.64.130
1F：推 LinusChen:谢谢 我试看看 05/08 23:56