这个正则表达式该如何实现？

sukermq
这个正则表达式该如何实现？

小弟刚学perl请教个小问题：

my $cont = '< P align=center>测试1 <a href="#"><B>链接1</B></a><a href="#">链接2</a>  <span class="sp1">题目</span> </P><span class="sp2">标题1</span>';

如何通过正则表达式来实现这样的结果？
测试1+链接1+链接2+题目+标题1

谢谢。。。:) :wink:

hitsubunnu
[code]

$cont =~ s/<.*?>/+/g;
$cont =~ s/ /+/g;
$cont =~ s//+{2,}/+/g;

[/code]

sukermq
回复 #2 hitsubunnu 的帖子

多谢了。。。
:wink:

cobrawgl
[code]
$cont =~ s/^<[^<]+>(.*)<.*>$/$1/;
$cont =~ s/(((<[^<]+>)| )+)//+/g;

或者

$cont =~ s/(((<[^<]+>)| )+)//+/g;
$cont =~ s/^/+(.*)/+$/$1/;
[/code]