网页抽取正则问题

heut2009

1. #!/usr/bin/perl
   
2. 
   
3. use strict;
   
4. use warnings;
   
5. 
   
6. my $html = "<table><tr><td>aa</td><td>bb</td></tr></table>标记1<table><tr><td>cc</td><td>dd</td></tr></table>标记2<table><tr><td>ee</td><td>ff</td></tr></table>";
   
7. my @td = ($html =~ /标记1.*?(<td>.*?<\/td>)(<td>.*?<\/td>)/i);
   
8. print "@td";
   
9. ;

复制代码

结果 <td>cc</td> <td>dd</td>

heut2009

回复 8# x9x9


    正则虽然无所不能，但是效率上想也知道会很低，我一般都用index 和substr ，截取出目标段，然后再匹配。