perl – 如何获取外键而不是对象的值？

概述我有两张桌子,书和语言; book belongs_to language通过一个语言列来说明它所使用的语言.语言表只是语言列. 我想做$book->语言并获取语言字符串,而无需从语言表中获取语言.有没有办法做到这一点？ 我怀疑这是关于回归的背景.我应该做一些过载,说： use overload "language_string" => sub { my $self = shift; re 我有两张桌子,书和语言; book belongs_to language通过一个语言列来说明它所使用的语言.语言表只是语言列.

我想做$book->语言并获取语言字符串,而无需从语言表中获取语言.有没有办法做到这一点？

我怀疑这是关于回归的背景.我应该做一些过载,说：

use overload "language_string" => sub {  my $self = shift;  return $self->language;},fallback => 1;

但在那种情况下,我当然还在掌握语言.

解决方法 一种解决方案是使用与列不同的名称来定义关系,例如,rel_ $colname的.
然后,DBIC生成的访问器方法对于列值和相关对象将是不同的.

如果您不想更改关系名称,可以随时使用$row-> get_column(‘colname’)访问列值;

总结

以上是内存溢出为你收集整理的perl – 如何获取外键而不是对象的值？全部内容，希望文章能够帮你解决perl – 如何获取外键而不是对象的值？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。