Select Code to Download

$dbh->rollback;   # <---- still records get committed into the dB !!!
$sth->finish;