You can run this hook whenever Radiator attempts to connect to
an SQL database and fails to connect. The default is to log the failure.
The hook is called with 4 arguments: $object
,
$dbsource
, $dbusername
,
$dbauth
. $object
is the SqlDb
object trying to connect. The other parameters are the currently used
values for DBSource
, DBUsername
,
and DBAuth
.
In the following example the
default hook is replaced with a hook that logs unobscured
password.
ConnectionAttemptFailedHook sub { \
my $self = $_[0]; my $dbsource = $_[1]; \
my $dbusername = $_[2]; my $dbauth = $_[3]; \
$self->log($main::LOG_ERR, "Could not connect to SQL database with DBI->connect \
$dbsource, $dbusername, $dbauth: $@ $DBI::errstr"); }