Scott

I once wrote a perl script that connected to an Access Database using the Win32::ODBC module...

Here is a bit of code to get you started:

# Load the module
use Win32::ODBC;

# Make a new database object, the dsn,
# userid, and password are things you need
# to fill in
my($db) = new Win32::ODBC("dsn=yourdsn; uid=foo; pwd=bar");

# Send the database some SQL
$db->Sql("SELECT * FROM your_table");

#print out some stuff
while ($db->FetchRow()) {
    my(%data) = $db->DataHash();
    print "Your data is: $data{'some_value'}";
}

# Close the database
$db->Close();
[download]

It is a good idea to include statements that check for errors... maybe you should read this tutorial.

I just posted this node in reply to a similar question. Here's the sample code included in that node:

use strict;
use Win32::OLE;

my $provider = 'Microsoft.Jet.OLEDB.4.0';
my $dir = 'c:\perl\cgi-bin';
my $dbase = 'mydb.mdb';

my $user = ''; #use if needed
my $password = ''; #use if needed

my $connStr = "Provider=$provider;Data Source=$dir\\$dbase;User ID=$us
+er;Password=$password;";
my $conn = Win32::OLE->new('ADODB.Connection') or die("Could not creat
+e Connection: $!");
$conn->Open($connStr);
[download]

-jehuni