有没有办法使用现有的 DBI 数据库句柄连接到 DBIx::Class 架构？

Question

如果我已经有一个活动的 DBI 数据库句柄，有没有办法使用该数据库句柄实例化 DBIx::Class 模式，而不是创建一个新连接，例如

my $schema = MyApp::Schema->connect($dbh);

（这是因为某些遗留代码使用了一些较新的基于 DBIC 的代码。不，我无法连接到架构并将架构的数据库句柄传递给遗留代码，并且不，我无法重写遗留代码以使用 DBIC .)

Answer 1

我认为这会起作用

my $schema = MyApp::Schema->connect(sub { $dbh });

来自 perldoc DBIx::Class::Storage::DBI