День добрый. подскажите как в perl сделать регистрозависимую сортировку? что-то Perl Cookbook я этого не нашел. конструкция
setlocale(LC_ALL,'ru'); setlocale(LC_COLLATE,'ru'); @SortedArray = sort {$hash{$a} cmp $hash{$b}} keys %hash;
возвращает список отсортированный по алфавиту, но мне надо, чтом в списке заглавные буквы шли впереди.
не подскажете рецепт ?
