sub dbconn() {
    my ($cnf,$thread) = @_;