问解析HTML标题

EN

use HTML::TreeBuilder::XPath;

my $html = <<EOFHTML;
...
<div class="termContainer">
<h4>SUMMER 2013</h4>
<ul>
<li>   
<a href="url" title="A">
<span>A</span>
</a></li>
<li><a href="url" title="B">
<span>B</span>
</a></li>
<li><a href="url" title="C">
<span>C</span>
</a></li>
</ul>
</div>
...
<div class="termContainer">
<h4>SPRING 2013</h4>
...other links
</div>
...
EOFHTML

my $tree = HTML::TreeBuilder::XPath->new_from_content($html);

foreach my $title ( $tree->findvalues('//div[@class="termContainer"]//a/@title') ) {
    print $title, "\n";
}