Extracting TD's from a Text File (Regex Help).

------=_NextPart_000_0103_01C8999D.0EC89240
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

################ TEXT FILE ##################
<td class=3D"PhorumTableRowAlt thread"  style=3D"padding-left: 0px">
       =20
            <a =
href=3D"http://mysite.com/link/here_goes?id=3D239">LINK</a>

    &nbsp;<span class=3D"PhorumNewFlag"></span></td>

 <td class=3D"PhorumTableRowAlt" nowrap=3D"nowrap" width=3D"150">
  <a href=3D"http://mysite.com/link/here_goes?id=3D239">LINK</a>
</td>
    <td class=3D"PhorumTableRowAlt PhorumSmallFont" nowrap=3D"nowrap" =
width=3D"150">06/11/2007 12:29AM
 </td>
</tr>
############################################

The text file contains hundreds of tds structure like above. All I need =
is to extract the td with class "PhorumTableRowAlt thread". I have tried =
every possible option, but finally I am coming to you for any Regex for =
it? TIA.

HERE IS WHAT I AM DOING:

pen(TXT, "links.txt") or die "Unable to open file";
my @[EMAIL PROTECTED]
 =3D <TXT>;
close (TXT);
foreach my $link(@[EMAIL PROTECTED]
) {
if ($link =3D~ m|<td class=3D"PhorumTableRow thread" =
style=3D"padding-left: 0px">(.*?)</td>|gsi) {
print "$1";}
}



But NOTHING coming up. No results.

Thanks for any help.

Sara.





------=_NextPart_000_0103_01C8999D.0EC89240--