my $dbh3 = DBI->connect("DBI:ODBC:driver={SQL Server};Server=$server;Database=$database;UID=$dbusername;PWD=$dbpassword");
	
	$dbh3->do("IF EXISTS (SELECT * FROM sysobjects WHERE id = object_id(N'[dbo].[$tbl]') AND OBJECTPROPERTY(id, N'IsUserTable') = 1) 
					DROP TABLE [dbo].[$tbl]; 
					CREATE TABLE [dbo].[$tbl] (@{$tables->{$tbl}})");