Perl如何过滤html标签

比如一串字符串

<div><b>123</b></div>


如果只想拿到123怎么办呢?

用perl的正则表达式可以很容易的做到。

$str =~  s/<([a-zA-Z]\w*)(\s+\S+)*>(.+?)<\/\1>/$3/sg;


这种只能过滤掉左右对称的标签,如果你的字符串里的html标签不对称,或者是有缺陷,这种方式就做不了了。

如果上边的看不懂,那看个简单的:

$retPromotionInfo=~s/<.*?>//g;
$retPromotionInfo=~s/&lt;.*?&gt;//g;


上边的问号代表懒惰匹配,如果不加问号,会把中间的内容也过滤掉。


第二行表示对转义过的标签也进行过滤,

&lt; 代表 <

&gt; 代表 >


好了,就到这里吧。

原文:http://blog.csdn.net/hongchangfirst/article/details/37693005

作者:hongchangfirst

hongchangfirst的主页:http://blog.csdn.net/hongchangfirst


Perl如何过滤html标签,布布扣,bubuko.com

Perl如何过滤html标签

上一篇:常见CSS属性及值


下一篇:四款超棒的jQuery数字化签名插件