这是一个 Perl 快速问题:
如何转换 HTML 特殊字符,例如ü
or '
转换为普通 ASCII 文本?
我从这样的事情开始:
s/\&#(\d+);/chr($1)/eg;
并且可以为所有 HTML 字符编写它,但是像这样的函数可能已经存在?
请注意,我不需要完整的 HTML->文本转换器。我已经用以下命令解析了 HTMLHTML::Parser
。我只需要使用我得到的特殊字符转换文本。
看一眼HTML::实体 http://search.cpan.org/perldoc?HTML::Entities:
use HTML::Entities;
my $html = "Snoopy & Charlie Brown";
print decode_entities($html), "\n";
你可以猜出输出。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)