Help for this page
my $last_time = time; sort { ... }; $a <=> $b } @list;
for (@items) { push @$_, deaccent( $_->[$selected+2] ) . $_->[$selected+2]; }; @items = sort { $a->[-1] cmp $b->[-1] } @items;