You will have to create your own sorting algorithm. Default sort's cmp operator sorts on the 'ascii value' of the characters. Therefore é comes way after z.

Chapter 3.2.153 of 'Learning Perl' by O'Reilly covers using your own algorithms for sort. The essence is to have a subroutine return -1 if $a < $b, return 0 if $a == $b and return 1 if $a > $b, where $a and $b are the two array elements to compare.

You could perhaps make a hash like this:

my %characterOrder = (
'a' => 1,
'â' => 1,
'ä' => 1,
...
'b' => 2,
'c' => 3,
'Ç' => 4,
...
);
[download]

You can then compare the values of $characterOrder{$a} with $characterOrder{$b} likt this:

sub GoodSort
{
  $characterOrder{$a} <=> $characterOrder{$b}
}
[download]