newbieperlperson has asked for the wisdom of the Perl Monks concerning the following question:
Very new to Perl. I am having issues trying to get DBI to communicate to a SQL server 2008 DB.
I am trying to avoid using ODBC here.
install_driver(MSSQL) failed: Can't locate object method "set_sql" via package "Class::DBI::MSSQL" at C:/Perl/lib/DBD/MSSQL.pm line 79. Compilation failed in require at (eval 19)C:/Perl/site/lib/DBI.pm:744 line 3.
I am new to Perl and I suspect I have screwed up how to install some libraries
use strict; use warnings; use diagnostics; use Class::DBI::Loader; use DBI; #use replace; use File::Glob ':glob'; #Variable Declarations ############# #---Database Credentials my $DBUserName = "******"; my $DBPassword = "****"; my $DBName = "dbi:MSSQL:dbservername"; #------Used in Database Transactions my $dbh = ""; my $sqlStatement = ""; my $sqlCmd = ""; #---Variables used to gather Easy Set Table names my @EasySetTableNames = (); #------Establish DB Connection $dbh = DBI->connect( $DBName, $DBUserName, $DBPassword,{ PrintError => + 0,AutoCommit => 0}) || die "Database connection creation failed: $DBI::errstr\n"; # Get the Easy Set Tables #---These tables in the Insight Database all start with AI_ so get at + list of those tables $sqlStatement = "SELECT * from tableA "; $sqlCmd = $dbh->prepare($sqlStatement); $sqlCmd->execute(); @EasySetTableNames = @{$dbh->selectcol_arrayref($sqlStatement)}; print "hi";
Any help you can provide would be so appreciated.
Thanks,
AJ
|
|---|