[求救]如何利用perl兼容的正则表达式分析出关键字前后的<td>
想了好长时间没有找到合适的方案，请大家帮忙看看
$keyText = 'test';
$str = '<table><tr><td class="p1">this is test <table><tr><td>abcdefg test</td></tr></table>keyText</td></tr></table>';
1、已知 $keyText 的值；
2、<td class="p1">中除了<td是固定的外class="p1"是随机的；
3、第一个<table>.....</table>中另外套了一个不相干的<table>；
4、第二个<table><tr><td>.....</td></tr></table>中有可能包含与$keyText相同的关键字；
希望返回：
1、返回this is test <table><tr><td>abcdefg test</td></tr></table>keyText；
2、第一个<td>，即目前的<td class="p1">；
3、返回距离keyText后最近的</td>；
先谢谢大家了。
问题点数：0、回复次数：2Top
1 楼drifters（呵呵）回复于 2003-12-03 00:37:06 得分 0
唉,$str也可能是这样的
$str = '<table><tr><td class="p1"><table><tr><td class="p1">this is test <table><tr><td>abcdefg test</td></tr></table>keyText test</td></tr></table></td></tr></table>';
Top
2 楼drifters（呵呵）回复于 2003-12-03 13:06:16 得分 0
还有个问题
如何区分每个<table>所对应的</table>？Top
