my $sth = $dbh->prepare("SELECT constraint_name FROM INFORMATION_SCHEMA.CONSTRAINT_COLUMN_USAGE WHERE TABLE_NAME = '$tbl'");
    $sth->execute;
    my $temp =  $sth->fetchrow_arrayref;
    foreach my $rel (@$temp)
    {            
        next unless ($rel =~ /ID/);
        $dbh_tmp->do("ALTER TABLE $tbl DROP CONSTRAINT $rel");
    }