#652091 Doesn't allow passing attribute to DBI->connect

Package:
libpoe-component-dbiagent-perl
Source:
libpoe-component-dbiagent-perl
Submitter:
Anthony DeRobertis
Date:
2011-12-15 20:51:17 UTC
Severity:
normal
#652091#5
Date:
2011-12-14 18:12:49 UTC
From:
To:
The documentation for for DSN says:

       DSN An arrayref of parameters to pass to DBI->connect (usually a dsn,
           username, and password).

So, I should be able to have

	DSN => [
		'dbi:Oracle:tnsname', 'user', 'pass',
		{ ora_session_mode => ORA_SYSDBA }
	],

but that results in an error:

	Usage: $class->connect([$dsn [,$user [,$passwd [,\%attr]]]]) at /usr/share/perl5/POE/Component/DBIAgent/Helper.pm line 163

because _ini_dbi doesn't actually treat DSN the way the docs say;
instead, it always tacks on its on \%attr:

    my $dbh = DBI->connect(@$dsn, { AutoCommit => 1, RaiseError => 0, PrintError => 0 }) or die DBI->errstr;

Which means its not possible to pass ora_session_mode (or any other
attribute) at all.