帮帮我！怎么取得汉字的unicode值。

xyu4

perl中哪个函数可以取得汉字的unicode值。我用函数ord，直接返回0,对汉字无效。请哪位朋友指点一下。

apile

unpack("H*","文字";

xyu4

好像不对。
print unpack("H*","我"."\n";
返回ced2.不是unicode值啊

apile

16進位..
\xce\xd2
一個中文字有兩個byte..
每個byte用16進位表示...
H : 高位元在前面
h : 低位元在前面..
看一下unpack()使用吧..

perldoc -f unpack
上面的作法會依據你OS使用的編碼..而有差異..

或用下面這個module轉碼..目前在5.8上面default就有安裝..
http://search.cpan.org/author/JHI/perl-5.8.0/ext/Encode/Encode.pm

xyu4

果然是高手！佩服佩服