This is wrong in so many ways. First of all, you're parsing HTML with a regex. Don't do that. Use HTML::Parser
Second, you're trying to extract data from an HTML table using regex. Don't do that. Use HTML::TableExtract instead. It will save you a LOT of hairpulling.