perl – DBIx :: Class示例

在下面的示例中:
my $rs = $schema->resultset('CD')->search(
{
  'artist.name' => 'Bob Marley'
  'liner_notes.notes' => { 'like','%some text%' },},{
  join     => [qw/ artist liner_notes /],order_by => [qw/ artist.name /],}
);

DBIx cookbook说这是将生成sql

# Equivalent sql:
# SELECT cd.*,artist.*,liner_notes.* FROM cd
# JOIN artist ON cd.artist = artist.id
# JOIN liner_notes ON cd.id = liner_notes.cd
# WHERE artist.name = 'Bob Marley'
# ORDER BY artist.name

但是从菜谱的其余部分开始,我一直认为查询只会选择cd.*,除非当然使用prefetch是这样的:

my $rs = $schema->resultset('CD')->search(
{
  'artist.name' => 'Bob Marley'
  'liner_notes.notes' => { 'like',prefetch => [qw/ artist liner_notes/],}
);

以下是让我相信这一点的陈述:

[Prefetch] allows you to fetch results from related tables in advance

任何人都可以向我解释我在这里缺少的东西吗?或不?非常感谢!

解决方法

等效sql与菜谱的 previous section相矛盾,看起来像是一个错误.

在执行查询并应用过滤器和排序条件时,Join将使用连接表中的列,但它不会返回连接表的列.这意味着如果您执行$cd-> artist-> name,那么它将需要它来做一个额外的SELECT艺术家.* FROM artist WHERE artist.id =?每次打电话给那个陈述时都要得到艺术家的名字.

预取用于从预取表中选择所有列.在实际需要这些列时使用预取更有效,例如:所以你可以做$cd-> artist-> name而不需要它来做额外的查询.但是,如果您不需要这些列,那么加载该数据会产生不必要的性能损失.

相关文章

1. 如何去重 #!/usr/bin/perl use strict; my %hash; while(...
最近写了一个perl脚本,实现的功能是将表格中其中两列的数据...
表的数据字典格式如下:如果手动写MySQL建表语句,确认麻烦,...
巡检类工作经常会出具日报,最近在原有日报的基础上又新增了...
在实际生产环境中,常常需要从后台日志中截取报文,报文的形...
最近写的一个perl程序,通过关键词匹配统计其出现的频率,让...