locating div with paragraph in perl with HTML::TreeBuilder

locating div with paragraph in perl with HTML::TreeBuilder

I am trying to figure out the best way to use HTML::TreeBuilder in Perl to
extract a few paragraphs of text from some HTML in a XML file.
I had it working using $tree->address (or so I thought) until I realized
that not all entries are in the same order.
Without going though every single item in the list, it appears that each
entry has several <div> elements, but only one of the <div>'s has <p>
elements in it. And none of the <div>'s have classes, which would make
this easy.
I have tried several different ways, and so for nothing seems to work in
which I can extract the text in the that I want. I have looked at several
different examples, but non of them really are close enough to what I am
looking for.
It would be nice if something like this worked:
$bodyText = $tree->look_down( '_tag' => 'div' => 'p' );
But that gives me the error:
param list to look_down ends in a key!
Anyways, maybe someone can help point me in the right direction, I have
been looking all night, and now my brain hurts.
Thanks!
John