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