in reply to Report Application Name to Enterprise Manager via DBI
You may have to tweak the source code and add your attribute in the connect sub
package DBD::mSQL::dr; # ====== DRIVER ====== use strict; sub connect { my($drh, $dsn, $username, $password, $attrhash) = @_; my($port); my($cWarn); # Avoid warnings for undefined values $username ||= ''; $password ||= ''; # create a 'blank' dbh my($this, $privateAttrHash); $privateAttrHash = { 'Name' => $dsn, 'user' => $username, 'password' => $password, # here ? };
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Report Application Name to Enterprise Manager via DBI
by Grygonos (Chaplain) on Jun 11, 2004 at 12:57 UTC |
In Section
Seekers of Perl Wisdom