use warnings;
use strict;

use HTML::TableExtract;
use LWP::Simple;

my $T = HTML::TableExtract->new();
my $table = $T->parse(get(
            'http://.......'))
             ->first_table_found;

my @rows = $table->rows;
for my $row (@rows) {
    # Process rows...
}