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