读书人

perl :施瓦茨转换多级排序:首先按

发布时间: 2012-12-20 09:53:21 作者: rapoo

perl :施瓦茨变换,多级排序:首先按照第一列排序,第一列相等的按照第二列排序............

这篇文章的写成主要参考了ace_fei的内容,其中我认为有错误的地方,并进行了修改。网页如下:http://blog.csdn.net/ace_fei/article/details/7679609,大家可以到哪里去比较参考。

加入我们有这样一个文件,他的内容如下:

4 6 3
4 5 1
1 2 3
1 9 0
2 0 5
3 6 2
2 0 8
2 0 6

当然可能更多,我们排序的规则如下:

首先按照第一列排序,如果第一列相等,那么就按照第二列进行排序,如果第二列相等就按照第三列的内容排序。

我们先把问题最简单化,把上述的数字放到一个数组中;然后进行排序;

程序如下:

C:\WINDOWS\system32\cmd.exe /c perl "F:\perl\b.pl"1 9 01 2 32 0 52 0 62 0 83 6 24 6 34 5 1Hit any key to close this window...


读书人网 >perl python

热点推荐