perl – 如何使DBIx :: Class :: Schema :: Loader忽略非结果类？

2024年1月5日 218次阅读

我正在从使用动态模式的
DBIx::Class::Schema::Loader切换到静态模式.

但是有一个问题,我的结果类与非结果类混在一起. Here’s the specifics.

lib/BackPAN/Index.pm            # main API
lib/BackPAN/Index/Dist.pm       # result class
lib/BackPAN/Index/File.pm       # result class
lib/BackPAN/Index/Release.pm    # result class
lib/BackPAN/Index/Schema.pm     # subclass of DBIC::Schema::Loader
lib/BackPAN/Index/Role/...      # various roles

当我切换到静态模式生成时,它会被角色绊倒.

DBIx::Class::Schema::load_namespaces(): Attempt to load_namespaces()
class BackPAN::Index::Role::HasCache failed – are you sure this is a
real Result Class?

我坚持这个班级布局. BackPAN :: Index :: Dist,File和Release都是公开记录的.由于查询,许多方法都会返回它们.

我需要一种方法在静态模式下使用DBIx::Class::Schema::Loader,而BackPAN :: Index :: Dist,File和Release用作结果类.

我一直试图让DBIx::Class::Schema::Loader拼出生成的结果类,而不是依赖于load_namespaces来搜索子目录.

理想情况下,我希望生成的结果类位于它们自己的子目录中,Dist,File和Release作为子类,以便于自定义.但是,针对模式的查询必须返回自定义的子类.

最佳答案 通常,您有一个Result和一个ResultSet命名空间,其中包含相应的类：

BackPAN::Index::Schema::Result::Dist
BackPAN::Index::Schema::ResultSet::Dist

DBIx::Class::Schema#load_namespaces文档显示了将它们设置为非默认值的示例.

您还可以使用DBIx::Class::Schema#load_classes并指定每个类：

BackPAN::Index::Schema->load_classes({
    BackPAN::Index => [qw( Dist File Release )],
});

通常,将Result和ResultSet类移动到不同的命名空间并不是一个问题,因为它们总是通过加载它们的Schema实例访问.
我建议在使用load_classes之前尝试移动它们并查看它是否真的破坏了某些东西.

点赞