WWF

The World Wide Fund for Nature (WWF) is....

M4P

The Money for People Fund (MFP) is....

WW2

The World Wide Fund for People (WWFP) is....

##

use strict;
use HTML::TreeBuilder::XPath;
use Data::Dumper;

my $file_name = qq~/usr/local/apache/htdocs/jspelkey/html5_section.html~;
my $tree = HTML::TreeBuilder::XPath->new; # empty tree
    $tree->parse_file($file_name);

    for my $result ($tree->findnodes(q{/html/body/div[@class="center"]})) {
       my $x = HTML::TreeBuilder::XPath->new;
          $x->parse($result->as_HTML);
          print $x->findvalue(q{/h1});
          print "
".("-" x 17)."
\n";
    } 
    
    $tree = $tree->delete;