сори народ я протупил , нужно было параметр g (глобальный поиск) использовать .

@loleg=$content =~m {<[<th>]+/?>(.+?)</?[\/th]+>}g;