use HTML::TreeBuilder;
use Data::Dumper;
use 5.16.0;
my $h = HTML::TreeBuilder->new;
$h->parse_content( do{ local $/; } );
my @headers =
map @{ $_->content },
($h->look_down
(
_tag => 'td', class => qr/HeaderTitle\b?/ ,
)
)
;
print Dumper \@headers;
__DATA__
TSM Operational Reporting