$dbh = new Win32::ODBC("DSN=$dsn1;UID=$user;PWD=$pw;");

##</code><code>##

    $dbh->Close(  );