[PerlChina] Re: 解析HTML entities

2009/7/7 cnhack TNT <cnhacktnt@gmail.com>

怎么不行？
decode_entities 是 HTML::Entities 默认导入的函数，你只要：

use HTML::Entities;
$str = '&#63849;&#64001;';
$str_decoded =  decode_entities($str);

这时 $str_decoded 里面的就是你要的 unicode 字符了啊。
如果你的环境是 utf8 的，那么：

use Encode;
print encode_utf8 $str_decoded;

就可以正确打印出你要的字符 "數度" 了。

恩, 昨天是因为用的版本太低.CPAN上弄了一个新的就OK了.
谢谢.

--
>: ~

--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
 要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
 要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛

-~----------~----~----~----~------~----~------~--~---