my $p = HTML::Parser->new( api_version => 3,
                         start_h => [\&start, "tagname, attr"],
                         end_h   => [\&end,   "tagname"],
                         text_h   => [\&text,   "dtext"],
                         marked_sections => 1,
                       );


# Parse directly from file
$p->parse_file($inputFile);