| Subject: | Uninitialized reference to $options{driver} |
Hi Jonny
In Log::Handler::Output::DBI, sub _validate says the 'driver' option is
optional, at line 434. That's OK.
But at line 556 the line:
if ($options{driver} =~ /oracle/i) {
should say:
if ($options{driver} && ($options{driver} =~ /oracle/i) ) {
to stop this msg:
Use of uninitialized value $options{"driver"} in pattern match (m//) at
/home/ron/perl5/lib/perl5/Log/Handler/Output/DBI.pm line 556.
Cheers
Ron