I'm using DBD::Mock to simulate a MySQL connection. I'm running into an issue when trying to work with the mysql_insertid DBH attribute. Reading DBI::DBD, DBD/Mock.pm, and (what I can understand of) DBI.pm, I should be able to do the following:

use DBI;

my $dbh = DBI->connect( 'dbi:Mock:', '', '' ) or die $DBI::errstr;

$dbh->{mysql_insertid} = 10;

print $dbh->{mysql_insertid}, $/;

-----
10
[download]

Except, mysql_insertid doesn't seem to be getting set, meaning that I am printing undef, not 10. Does anyone more knowledgable in this have any suggestions? (DBI 1.43, DBD::Mock 0.11, Perl 5.8.0, Solaris9)