Help for this page
eval { push @tbl, [ @$_ ] for $table->rows };<br> if ($@) {<br> my $error = $@; <br> warn " Custom error type 1 = no problem ";<br> }