my $documents = $schema->resultset('Document')->search();

##</code><code>##

while (my $document = $documents->next) {
    my $related_objects = $document->HOW_DO_I_DO_THIS();
    ...
}