|
I have installed ActivePerl 5.8.4.810 and mySQL 4.1.7 and cannot
connect when using the DBI. The version of DBD::mysql according to the PPM is 2.9003. The error message is: DBI connect('test','dazzyb',...) failed: Client does not support
authentication protocol requested by server; consider upgrading MySQL client at
D:/MyProjects/Perl/Modules/mySQL_Interface.pm line 157 The code trying to connect is as follows: It’s basic use it to run Select… queries. sub Select_DBI(\$) { #Uses the DBI #Takes the query as the argument #Returns array as a reference my $status = 0; #Connects to the database using DBI my( $USER_ID, $USER_PW, $dbHndl, $rquery, $query, $result
); my( @row, @ciData, @temp ); $USER_ID = "dazzyb"; $USER_PW = "test"; my $DB = "DBI:mysql:test"; #Get the user details from Vault using DBI $dbHndl = DBI->connect($DB, $USER_ID, $USER_PW,
{'RaiseError' => 1}); $rquery = ${$_[0]}; print "####DEBUG: QUERY: $rquery\n" if( defined(
$ENV{"DEBUG"} ) ); $query = $dbHndl->prepare( $rquery ); $query->execute; while( @row = $query->fetchrow_array() ) { push( @temp, @row ); } $query->finish; #Close the DB connection $dbHndl->disconnect; @row = @temp; return [EMAIL PROTECTED]; } The strange thing is I can connect using the following command line: Mysql test –u dazzyb –ptest. Any suggestions/ideas Darren Barnes |
_______________________________________________ ActivePerl mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
