my $rs = $db->resultset('Painting');

while ( my $painting = $rs->next ) {
    say sprintf('%s: "%s" (%s)',
        $painting->artwork->artist->name,
        $painting->artwork->name,
        $painting->medium,
    );
}