Учитывая простой случай двух таблиц - Термин и Определение - где Термин has_many
Определения и Определение belongs_to
Термин, все термины и соответствующие определения должны быть извлечены и каким-либо образом отображены.
Вот что я придумал до сих пор:
my $terms= $schema->resultset('Term')->search(undef, {
prefetch => 'definitions',
});
while (my $term = $terms->next) {
my @terms;
push @terms, $term->term;
my $definitions = $term->definitions;
my @definitions;
while (my $definition = $definitions->next) {
push @definitions, $definitions;
}
...
}
Он выполняет свою работу, но мне было интересно, можно ли использовать другой, менее грубый подход.