高级排序

Perlvim

1. 数字不一定是 /\d+/  1.1 就不是
2. 字符串中可以有数字  num1 num2
3. 字符串排序不需要用子函数，sort 默认就是用 { $a cmp $b }

kk861123

回复 11# Perlvim


    谢谢，您总是这么严谨！这个题目只是求一个思路，当需要排序的内容中即包含数字又包含字符串，那么我们不能简单的使用 cmp 或 <=> 来处理。

kk861123

回复 10# mcshell


    第一步的sort还是整合到第二步吧，否则太影响效率了

jason680

回复 9# kk861123

How about this one, modify by your code...
Note: number is more than zero

my @new = map  { $_->[0]  }
          sort { $a->[1] cmp $b->[1] }
          map  { [ $_, sprintf("%020d%s", m/^\d/? -$_ : 0, $_) ] } @org;   

mcshell

kk861123 发表于 2013-04-24 10:44
回复 10# mcshell

大牛 说的对{:3_193:}

kk861123

回复 14# jason680


    Yes! The key point is how to format a value which will be used in 'cmp'. I'm considering about this, and thank you for your idea~

rubyish

大牛 3Q~