| Subject: | mysql_use_result-via-dsn does not behave as advertised in POD |
Modify to taste and execute this oneliner. I expected one of the dumps to produce ... => 1. Instead two undefs
perl -MDBI -MData::Dumper -e '
for $ur (0,1) {
my @dsn = map { $ENV{"DBICTEST_MYSQL_$_"} } qw(DSN USER PASS);
$dsn[0] .= ";mysql_use_result=1" if $ur;
warn Dumper { dsn => \@dsn, use_result => DBI->connect(@dsn)->{mysql_use_result} }
}
'
result:
------------
$VAR1 = {
'use_result' => undef,
'dsn' => [
'DBI:mysql:database=dbic_test;host=127.0.0.1',
'dbic_test',
'123'
]
};
$VAR1 = {
'use_result' => undef,
'dsn' => [
'DBI:mysql:database=dbic_test;host=127.0.0.1;mysql_use_result=1',
'dbic_test',
'123'
]
};