perl - DBIx :Class many-to-many relationship with additional attribute

Question

我正在 Catalyst 框架中使用 DBIx::Class。我的本地目标是在用户和任务之间添加新的多对多关系。但是我需要一个小技巧。用户可以在任务中拥有不同的角色(如“ worker ”或“旁观者”)。

所以我有 用户 包含这些字段的表:

id

姓名

我有 任务包含这些字段的表:

id

标题

说明

我有关系表 用户任务使用这些字段:

用户 ID

task_id

角色

我已经从 设置了 has_many用户 至 用户任务 , has_many 来自 任务至 用户任务以及 之间对应的many_to_many关系用户 和 任务 .那个简单的部分可以正常工作。

然后，例如，我想获取我的用户列表，包括用户在 $task_id 标识的任务中的角色:

my $users = $schema->resultset('User')->with_task_role($task_id);
while (my $u = $users->next) {
    print "User: " . $u->name . ", role: " . $u->get_column('task_role');
}

那么我应该如何编码这个 with_task_role 自定义结果集以在我的查询中使用用户的任务角色获取此附加字段？

Answer 1

首先，多对多不是一种关系。它是一个访问器(一个关系桥)。

其次，DBIx::Class 有一个很好的文档。看看加入/预取。
在您的 ResultSet/User.pm 文件中，您应该有类似的内容:

sub with_task_role {
    my ($self, $task_id) = @_;

    return $self->search({
            'task.task_id' => $task_id,
        },
        {
            join     => { 'user_task' => 'task' },
            prefetch => { 'user_task' => 'task' },
        },
    );
}

PS:抱歉，没看到Ashley已经回答了
PS2:在最后一行“})”之前应该只有“)”(已修复)