Environment: Windows 2008 R2 Standard (64-bit)
TeamSite : 7.3.1
Database : Oracle 11g
#!D:\Interwoven\TeamSite\iw-perl\bin
#======================================================================
#======================================================================
#use strict;
use DBI;
use DBD:
DBC;
#---------------------------------------------------------------------
$ENV{ORACLE_HOME} = 'D:\app\Administrator\product\11.2.0\client_1';
$ENV{LD_LIBRARY_PATH} = 'D:\app\Administrator\product\11.2.0\client_1\lib';
my $dbh = db_connect();
display_results();
$dbh->disconnect;
exit 0;
sub display_results {
my $query = "SELECT FIRST_NAME, LAST_NAME, COUNTRY FROM WEBREF_TEST";
my $result = exec_dbquery($query);
}
#======================================================================
# Get database connection details from property file
#======================================================================
sub db_connect {
my $db = "DBI
DBC:XYZ";
my $username = "xxxxxxxx";
my $auth = "xxxyyzz";
return DBI->connect($db,$username,$auth);
}
#======================================================================
# Execute query on TeamSite database
#======================================================================
sub exec_dbquery {
my $query = shift;
my $st = $dbh->prepare($query);
$st->execute();
return $st;
}
Error message:

\Interwoven\TeamSite\iw-perl\bin>iwperl ..\..\httpd\iw-bin\db_connection_check.ipl
DBI connect('TEAMSITQ','content',...) failed: [Microsoft][ODBC Driver Manager] The specified DSN contains an architectur
e mismatch between the Driver and Application (SQL-IM014)(DBD: db_login/SQLConnect err=-1) at ..\..\httpd\iw-bin\db_conn
ection_check.ipl line 38
Can't call method "prepare" on an undefined value at ..\..\httpd\iw-bin\db_connection_check.ipl line 47.