I have this script:

use strict;
use warnings;

use DBI;

my %attr = (
    PrintError => 0,
    RaiseError => 1
);

my @drivers = DBI->available_drivers();

foreach my $driver(@drivers) {
    print "Driver: $driver\n";
    my @dataSources = DBI->data_sources($driver);

    foreach my $dataSource(@dataSources) {
        print "\t$dataSource\n";
    }
    print "\n";
}

It simply gives me a list of DBD drivers installed. Ran fine until I upgrade
to 1.34 at which point I get the following error now:

install_driver(Proxy) failed: Global symbol "$this" requires explicit
package name at C:/Perl/site/lib/DBD/Proxy.pm line 272.
BEGIN not safe after errors--compilation aborted at
C:/Perl/site/lib/DBD/Proxy.pm line 414.
Compilation failed in require at (eval 3) line 3.

Nothing ground breaking...just thought you should know.

Bob


Reply via email to