Re: [問題] 關於regular expression

看板Perl作者 (相見不如懷念)時間18年前 (2007/08/18 11:27), 編輯推噓3(302)
留言5則, 3人參與, 最新討論串3/6 (看更多)
# 完全依照你給的測資跟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)

08/19 19:59, , 1F
s/<[^>]+><B>[^<]+<\/B><\/font>//go;
08/19 19:59, 1F

08/19 19:59, , 2F
請問這樣會比較快嗎?
08/19 19:59, 2F

08/19 21:37, , 3F
這樣會比較快 但是這樣就變成special case了~
08/19 21:37, 3F

08/20 12:13, , 4F
喔,也是啦
08/20 12:13, 4F

08/21 00:20, , 5F
多謝樓上兩位的解答^^
08/21 00:20, 5F
文章代碼(AID): #16ncSfdH (Perl)
文章代碼(AID): #16ncSfdH (Perl)