my $dbh = DBI->connect('DBI:ODBC:test1.mdb')
my $sth = $dbh->prepare("SELECT something FROM table")
my $sth = $dbh->prepare("INSERT INTO table VALUES (value1, value2, value3)")

# rest of program down here