sub BUILD { my ($self) = @_; my $driver = $self->dbh->{Driver}{Name}; my $class = __PACKAGE__.'::Driver::'.$driver; if (Class::Load::try_load_class($class)) { $class->meta->apply($self); } return $self; }