use DBI;

     #open connection to Access database
    $dbh = DBI->connect('dbi:ODBC:MSdabase01') or die "Fehler beim Connect: ",$DBI::errstr;
 
    #prepare and execute SQL statement
	$sqlstatement = 'SELECT * FROM Definitionen';
    $sth = $dbh->prepare($sqlstatement);
    $sth->execute or die "Could not execute SQL statement ... maybe invalid?";
  
    #output database results
    while (@row=$sth->fetchrow_array()){
    print "@row\n";
       }