in reply to Regex, Newline, Wilcard

Additionally, you have a greediness problem. 
/<TABLE(.*?)>(.*?)<\/TABLE>//si)
          ^     ^
          |     |
           \   /
           added

[download]

In Section Seekers of Perl Wisdom