DBIx-Connector

 view release on metacpan or  search on metacpan

lib/DBIx/Connector/Driver.pm  view on Meta::CPAN


DRIVERS: {
    my %DRIVERS;

    sub new {
        my ($class, $driver) = @_;
        return $DRIVERS{$driver} ||= do {
            my $subclass = __PACKAGE__ . "::$driver";
            eval "require $subclass";
            $class = $subclass unless $@;
            bless { driver => $driver } => $class;
        };
    }
}

sub _connect {
    my ($self, $dbh, $dsn, $username, $password, $attrs) = @_;
    $dbh;
}

sub ping {

 view all matches for this distribution
 view release on metacpan -  search on metacpan

( run in 0.786 second using v1.00-cache-2.02-grep-82fe00e-cpan-503542c4f10 )