|
I am trying to connect to an old MySQL (3.28) database using Net::MySQL. I pass in the
username and password as in the example, but get an error back. Here's the debug output:
$ ./update_tcm.pl
Use INET Socket: liono.egenera.com 3306/tcp
Net::MySQL::_get_server_information():
28 00 00 00 0A 33 2E 32 33 2E 35 38 00 DE AC 00 (....3.23.58....
00 67 33 67 31 58 49 46 63 00 2C 00 08 02 00 00 .g3g1XIFc.,.....
00 00 00 00 00 00 00 00 00 00 00 00 ............
Protocol Version: 10
Server Version: 3.23.58
Salt: g3g1XIFc
Net::MySQL::_send_login_message():
45 00 00 01 0D A6 03 00 00 00 00 01 21 00 00 00 E...............
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00 00 00 00 74 63 6D 5F 64 65 76 00 14 59 05 01 ....tcm_dev..Y..
6F 9E DA 57 BA 45 27 9E 5D 0D B0 4A 54 89 4E D1 o..W.E'....JT.N.
7E 74 63 6D 5F 64 65 76 00 .tcm_dev.
Net::MySQL::_request_authentication():
3D 00 00 02 FF 15 04 41 63 63 65 73 73 20 64 65 =......Access.de
6E 69 65 64 20 66 6F 72 20 75 73 65 72 3A 20 27 nied.for.user..'
40 31 30 2E 35 30 2E 31 30 2E 36 27 20 28 55 73 .10.50.10.6'.(Us
69 6E 67 20 70 61 73 73 77 6F 72 64 3A 20 4E 4F ing.password..NO
29 )
Access denied for user: '@10.50.10.6' (Using password: NO) at ./update_tcm.pl line 10
And the code to connect:
my $mysql = Net::MySQL->new(
hostname => 'hostname',
database => 'database',
user => 'user',
password => 'password',
debug => '1'
);
If I run the same code on against a 5.0 MySQL server, it works fine.
Unfortunately, I can't upgrade my server now. Can anyone tell me how
to get this to work???
Why does it say "Using Password: No"????
|