##
use HTML::TableExtract qw(tree);
$te = HTML::TableExtract->new( headers => [qw(Date Notifier H M R L Domain OS View)] );
$te->parse_file($html_file);
$table = $te->first_table_found;
$table_tree = $table->tree;
$table_html = $table_tree->as_HTML;
$table_text = $table_tree->as_text;
$document_tree = $te->tree;
$document_html = $document_tree->as_HTML;