Bug #71047 for DBD-mysql: Undefined $DBI::errstr on execute fail on Windows-7-x64

Hi, I get the same behavior on WinXP (32 bit): C:\>perl -le "use strict; use warnings; use DBI; my $h = DBI->connect('dbi:mysql:xxx', 'yyy','zzz', {RaiseError => 0, PrintError => 0}) or die $DBI::errstr; my $s = $h->prepare(q/select * from does_not_exist/) or die $DBI::errstr; $s->execute or die 'DBI:' . $DBI::errstr . ' sth:', $s->errstr;" Use of uninitialized value $DBI::errstr in concatenation (.) or string at -e line 1. Use of uninitialized value in die at -e line 1. DBI: sth: at -e line 1. Note exactly the same happens with RaiseError=1, i.e. RaiseError doesn't work: C:\>perl -le "use strict; use warnings; use DBI; my $h = DBI->connect('dbi:mysql:xxx', 'yyy','zzz', {RaiseError => 1, PrintError => 1}) or die $DBI::errstr; my $s = $h->prepare(q/select * from does_not_exist/) or die $DBI::errstr; $s->execute or die 'DBI:' . $DBI::errstr . ' sth:', $s->errstr;" Use of uninitialized value $DBI::errstr in concatenation (.) or string at -e line 1. Use of uninitialized value in die at -e line 1. DBI: sth: at -e line 1. C:\>perl --version This is perl 5, version 14, subversion 1 (v5.14.1) built for MSWin32-x86-multi-thread (with 1 registered patch, see perl -V for more detail) Copyright 1987-2011, Larry Wall Binary build 1401 [294969] provided by ActiveState http://www.ActiveState.com Built Jun 16 2011 18:54:40 MySQL is 5.1.44-community. DBI is 1.616 (the one coming with this ActivePerl build). DBD-mysql is 4.019 (the one from the ActiveState repository). Ralf

The combination WinXP, DBI 1.616, DBD-mysql 4.019, perl v5.10.1 ActiveState build 1006 is broken as well. WinXP DBI 1.607, DBD-mysql 4.017, perl v5.10.1 ActiveState build 1006 is ok. Win 2003 Server DBI 1.615, DBD-mysql 4.017, perl v5.10.1 ActiveState build 1006 is ok. DBD-mysql 4.020 isn't available as PPM yet, but I didn't find a corresponding changelog entry anyway.

For anyone else stuck on a broken DBD-mysql, you can get ActiveState's properly working 4.018 for 5.12 via this command: ppm install http://ppm4.activestate.com/MSWin32-x86/5.12/1205/C/CA/ CAPTTOFU/DBD-mysql-4.018.ppd For other versions you can try just changing the relevant parts in the URL.

careful, ActiveState got 4.020 to build on Tuesday, 2011-10-18, when they accepted my build fix, but that version was still broken. the rebuild with my patch from http://lists.mysql.com/perl/4415 finished today (2011-10-21), so if you happened to install 4.020 in the mean time, you have the running, but broken version. you have to uninstall DBD-mysql and install again to get the fix, as there is no secondary version/build number like with linux packages

This is finally merged here: https://github.com/perl5-dbi/DBD-mysql/commit/80e88e04a29bbec7ad593c1289b695d0d6270622 we'll have a new release with the fix out this week.