This seems to come up pretty regularly. The best answer seems to be Text::Balanced, which I recently bookmarked on my home node due to it's awesomeness. Sadly, I can't remember who pointed it out to me.