Matt S Trout wrote: > It's broken. > > } while ($self->search({$column => $val})); > > should be > > } while ($self->result_source->resultset->search({$column => $val})); Very sophisticated. ;-) Unfortunately this results in an infinite loop. $self->result_source->resultset->search({$column => $val})->next works. -- Bernhard Graf