tighten the code

This commit is contained in:
Yanick Champoux 2023-08-26 12:39:28 -04:00
parent 89cc65421c
commit 3ada526b23

View File

@ -42,14 +42,10 @@ sub get_mersenne_results() {
}
sub extract_first_table ($html) {
$html =~ s/\n//g;
my $te = HTML::TableExtract->new( depth => 0, count => 2 );
$te->parse($html);
return $te->first_table_found;
return HTML::TableExtract
->new( depth => 0, count => 2 )
->parse( $html =~ s/\n//gr )
->first_table_found;
}
sub generate_output_table ($ts) {