Case Insensitive Sort

使 sort 忽略大小写的传统技术是将字符串传递给 lcuc 进行比较:

@sorted = sort { lc($a) cmp lc($b) } @list;

这适用于所有版本的 Perl 5,对英语来说已经足够了; 你是否使用 uclc 并不重要。但是,它对于希腊语或土耳其语这样的语言存在问题,即大写和小写字母之间没有 1:1 的对应关系,因此根据你是使用 uc 还是 lc,你会得到不同的结果。因此,Perl 5.16 及更高版本有一个名为 fc案例折叠功能可以避免这个问题,所以现代多语言排序应该使用这个:

@sorted = sort { fc($a) cmp fc($b) } @list;