Perl 如何更改dbicdump创建的关系的名称

我有两张桌子，比如：

• 使用者
• 用户地址->带有fk的用户地址

我正在使用dbicdump生成我的dbic模式。 这将在User.pm中创建以下关系：

__PACKAGE__->has_many( 
  "user_addresses", 
  "World::DBIC::Result::UserAddress", 
  { "foreign.user_id" => "self.id" }, 
  { cascade_copy => 0, cascade_delete => 0 },
);

是否可以将关系的名称更改为“地址”之类的名称？怎么用？ （我的意思是在不更改代码的情况下#不要修改此代码或以上任何内容！）

---

如果没有，是否有办法为关系创建别名？

请查看中的rel\u name\u映射。创建模式时，您应该能够执行以下操作：

my %args = ( 
    use_moose      => 1,
    use_namespaces => 1,
    rel_name_map   => { user_addresses => 'addresses' },
    # more args here...
);

make_schema_at( 'My::Schema', \%args, [ $connect_arg ... ] );

rel_name_映射是一个重要的映射，但是我为上下文添加了更多的行