Select Code to Download

main.pl
...
$html->process (\$temp_html, { list => $names})
        or die $html->error;

delete.pl
...
$dbh->commit;
$dbh->disconnect;