Have you taken a look at the DBI documentation? my $sth = $dbh->prepare('SELECT * FROM Table'); $sth->execute();
while(my $row = $sth->fetchrow_hashref()){ my $name = $row->{NAME}; } -----Original Message----- From: Mike Blezien [mailto:[EMAIL PROTECTED] Sent: Wednesday, August 09, 2006 9:09 AM To: Peter Hoose; Perl List Subject: Re: Access MDF files Thx's Peter. Is there a way or simple means of just extracting the data from the mdb files so we can import it into a MySQL database, something like a dump file or similar ? Mike > ----- Original Message ----- > From: "Mike Blezien" <[EMAIL PROTECTED]> > To: "Perl List" <beginners@perl.org> > Sent: Wednesday, August 09, 2006 11:20 AM > Subject: Access MDF files > > >> Hello, >> >> is there a Perl module available to obtain data from Access .mdf files ? >> >> thx's >> >> Mike(mickalo)Blezien >> >> -- >> To unsubscribe, e-mail: [EMAIL PROTECTED] >> For additional commands, e-mail: [EMAIL PROTECTED] >> <http://learn.perl.org/> <http://learn.perl.org/first-response> >> >> > > DBI and DBD::ODBC > > Here's a sample connection script: > ================================== > > #!/usr/bin/perl > > use DBI; > use DBD::ODBC; > use strict; > use warnings; > > my $dsn = "test.mdb"; > > my $dbh = DBI->connect("dbi:ODBC:driver=microsoft access driver (*.mdb);dbq=" > . $dsn) or die "Can't connect to database: $dsn: $DBI::errstr\n"; > > if ($dbh) { > print "Connected to: $dsn\n"; > $dbh->disconnect; > exit; > } > > ================================== > > You can also use "ODBC Data Source Administrator" to setup System DSN's as > another way to connect, instead of directly to the file, like the above > example. > > There's a number of tutorials on this subject that you can find by googling > "perl access tutorial" or "perl odbc access", etc... > > Hope this helps, > > Peter -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>