use DBI;
my $datasource = "driver=Microsoft Access Driver (*.mdb);dbq=new.mdb";
my $username = 'admin';
my $password = '';

my $dbh = DBI->connect("dbi:ODBC:$datasource", $username, $password)
		|| die "Error connecting: $!";

my $sql   = "CREATE TABLE DBITable (FirstName TEXT, LastName TEXT)";

my $sth = $dbh->prepare($sql);
$sth->execute;