perl 怎么将unicode编码转unicode明文
perl 如何将unicode编码转unicode明文？
OS：unix .在文本中编辑的unicode编码如(5C0A656C)，要将其转成unicode明文(尊敬)，如何实现？
在perl程序中直接编辑unicode编码，通过Encode是可以输出明文的。
如：my $code="\x{5C0A}" ;print encode("gb2312",$code);
但从文本中读取，却无法实现！
------解决方案--------------------
没注意是Perl：
OS：unix .在文本中编辑的unicode编码如(5C0A656C)，要将其转成unicode明文(尊敬)，如何实现？
在perl程序中直接编辑unicode编码，通过Encode是可以输出明文的。
如：my $code="\x{5C0A}" ;print encode("gb2312",$code);
但从文本中读取，却无法实现！
------解决方案--------------------
没注意是Perl：
- Perl code
use Encode;
print encode('gbk', decode('utf-16be', pack('H*', '5C0A656C')));
------解决方案--------------------
- Perl code
use Encode;
print "$_\n" for Encode->encodings(":all");