Commit 5f35abd6 authored by Leo Gordon's avatar Leo Gordon
Browse files

use sth->finish

parent ebd73970
......@@ -29,6 +29,7 @@ sub fetch_input { # fetch all the (relevant) precomputed products
while (my ($digit, $result)=$sth->fetchrow_array()) {
$product_pair{$digit} = $result;
}
$sth->finish();
$product_pair{1} = $a_multiplier;
$product_pair{0} = 0;
......@@ -56,6 +57,7 @@ sub write_output { # store the final result
$self->param('b_multiplier'),
$self->param('result')
);
$sth->finish();
return 1;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment