Hi, All: I want to parse data from a HTML page, data like:
<tr >
<td valign="top">
YEMEN
</td>
<td valign="top">
YE
</td>
</tr>
<tr class="zebra">
<td valign="top">
<strong>Z</strong><a name="z.."></a>
</td>
<td valign="top">
</td>
</tr>
<tr >
<td valign="top">
ZAMBIA
</td>
<td valign="top">
ZM
</td>
</tr>
<tr class="zebra">
<td valign="top">
ZIMBABWE
</td>
<td valign="top">
ZW
</td>
</tr>
=====================================
I want to match one <tr>...</tr> pair.
my code :
my $pattern = "(<tr (.|\\n)*<\\\/tr>)";
my $match;
while($data =~ /$pattern/g){ # $data has the content above
$match = $&;
print $match;
}
but I got the whole matches instead of one <tr>...</tr> pair each loop.
Do you guys have any ideas?
Thanks and Best Regards.
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
