sort { deaccent($a) cmp deaccent($b) } @$selected

##</code><code>##

sort { deaccent($a->[1]) cmp deaccent($b->[1]) } @$selected

##</code><code>##

map $_->[0],
 sort $a->[1] cmp $b->[1],
  map [ $_, deaccent($_) ],
   @$selected

##</code><code>##

map $_->[0],
 sort $a->[1] cmp $b->[1],
  map [ $_, deaccent($_->[1]) ],
   @$selected