作者LiloHuang (相见不如怀念)
看板perl
标题Re: [问题] 关於regular expression
时间Sat Aug 18 11:27:36 2007
# 完全依照你给的测资跟output
$_ = qq~<font color = "red"><B>E2F-1</B></font> can also <font color =
"blue"><B>induce</B></font> <font color = "green"><B>p73</B></font> via a
p53-independent apoptotic pathway.~;
1 while s/<[^>]+>[^<]*<\/[^>]+>//;
print;
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.71.152
※ 编辑: LiloHuang 来自: 140.114.71.152 (08/18 11:39)
1F：推 david220:s/<[^>]+><B>[^<]+<\/B><\/font>//go; 08/19 19:59
2F：→ david220:请问这样会比较快吗? 08/19 19:59
3F：推 LiloHuang:这样会比较快 但是这样就变成special case了~ 08/19 21:37
4F：推 david220:喔，也是啦 08/20 12:13
5F：→ collin2315:多谢楼上两位的解答^^ 08/21 00:20