my $last_time = time;
    sort {
            if (time - $last_time > 1) {
                $mw->update();
            };
            $a <=> $b
         } @list;

##</code><code>##

for (@items) {
    push @$_, deaccent( $_->[$selected+2] ) . $_->[$selected+2];
};
@items = sort { $a->[-1] cmp $b->[-1] } @items;