yanick/gimps-review
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

tighten the code

Browse Source
This commit is contained in:
Yanick Champoux 2023-08-26 12:39:28 -04:00
parent 89cc65421c
commit 3ada526b23
1 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
script.pl
View File

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