任何人都知道如何按长度排序？
例如：(11,111,122,12,2,13,21,15,211,22,213,2004)
我希望排序的数组是：
11 12 13 15 111 122 2 21 22 213 2004
解决方法
所需的输出似乎表明您不只是想按数字排序,而是首先按第一个数字排序,然后按长度排序.
您显示的所需输出省略了211,所以我只是根据我的理解把它放在它所属的位置.
#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
my @source = (11,2004);
my @desired = (11,2004);
my @sorted =sort {
substr($a,1) <=> substr($b,1) ||
length($a) <=> length($b) ||
$a <=> $b # thanks @ikegami
} @source;
is_deeply(\@sorted,\@desired,'Sorted and desired are the same');