Sorry - Guess I got lost in the formatting of the post I replied to. I may not have seen XPath formatted this way before.

> Or even all in one xpath expression

 
> my @headers = $tree->findvalues( q{

> (
>    //table[ @class = 'HeaderFrame' ]
> )[1]
>         //td[ @class = 'HeaderTitle' ]
> } );
[download]

It's mostly my fault but maybe below is easier to follow possibly more familiar and compact?

my @headers = $tree->findvalues(
    '(//table[@class="HeaderFrame"])[1]//td[@class="HeaderTitle"]'
);
[download]