foreach $key1(keys(%prog_numbers))
{
$update = $ldb->prepare("UPDATE LOW_PRIORITY $ldbtable SET $mtime=$prog_numbers{$key1} WHERE software=\"$key1\"");
$showfail = $update->execute;
$update->finish();