Search notes:

Perl module HTML::TableExtract

use warnings;
use strict;

use HTML::TableExtract;
use String::Util 'trim';
use File::Slurp;

my $html = read_file('tables.html');

my $te = HTML::TableExtract->new;

$te -> parse($html);

foreach my $table ( $te->tables ) {

    print "\n\n\nTable (", join(',', $table->coords), "):\n-----------\n";   # (0,0)

    foreach my $row ($table->rows) {
      printf (("%-30s " x (@$row)) . "\n", map { $_ = trim $_; $_ //= '-'; substr($_, 0, 30); } @$row);
    }

}
Github repository PerlModules, path: /HTML/TableExtract/script.pl
Perl modules.

Index

Fatal error: Uncaught PDOException: SQLSTATE[HY000]: General error: 8 attempt to write a readonly database in /home/httpd/vhosts/renenyffenegger.ch/php/web-request-database.php:78 Stack trace: #0 /home/httpd/vhosts/renenyffenegger.ch/php/web-request-database.php(78): PDOStatement->execute(Array) #1 /home/httpd/vhosts/renenyffenegger.ch/php/web-request-database.php(30): insert_webrequest_('/notes/developm...', 1759407809, '216.73.216.42', 'Mozilla/5.0 App...', NULL) #2 /home/httpd/vhosts/renenyffenegger.ch/httpsdocs/notes/development/languages/Perl/modules/HTML/TableExtract/index(57): insert_webrequest() #3 {main} thrown in /home/httpd/vhosts/renenyffenegger.ch/php/web-request-database.php on line 78