while ($html =~/<br \/>.+<\/td>/gi) {
print "\n $& \n";
}