perl對(duì)m x n類似表進(jìn)行按列排序的代碼
更新時(shí)間：2013年02月09日 17:51:25 作者：
perl對(duì)m x n類似表進(jìn)行按列排序的代碼，有需要的朋友可以參考下
操作csv這樣的表格在perl處理文件中是經(jīng)常要碰到的。這樣的表類似二維數(shù)組，因此實(shí)際上的操作時(shí)對(duì)二維數(shù)組的操作了。
對(duì)這樣的行列表格，我們常常需要按照某列，或者先按照某列，再按另一列進(jìn)行排序，這里貼上perl的實(shí)現(xiàn)，以便下次使用查找。
看下面這段代碼。
復(fù)制代碼 代碼如下:
#!/usr/bin/perl
my @line;
while（<>）
{
chomp;
push @line, [ split ];
}
foreach ( sort { $a->[0] <=> $b->[0] or $a->[1] <=> $b->[1] or $a->[2] <=> $b->[2] } @line)
{
print @$_, "\n";
}
注意：
對(duì)于大的文件，最好不要這么用。
該腳本會(huì)把數(shù)據(jù)全部搬到內(nèi)存。
相關(guān)文章
這篇文章主要介紹了Perl讀寫文件簡(jiǎn)單示例,本文直接給出實(shí)現(xiàn)代碼,需要的朋友可以參考下2015-04-04
本文給大家分享的是使用perl生成隨機(jī)密碼的方法示例，而且可以通過(guò)參數(shù)來(lái)控制密碼中包含的字符種類，非常的不錯(cuò)，有需要的小伙伴可以參考下2016-06-06
這篇文章主要介紹了perl面向?qū)ο髮?shí)例,本文講解了一個(gè)類只是一個(gè)簡(jiǎn)單的包、對(duì)象僅僅只是引用、一個(gè)方法就是一個(gè)簡(jiǎn)單的子程序等內(nèi)容,并給出了一個(gè)簡(jiǎn)單示例,需要的朋友可以參考下2014-11-11
perl格式化輸出的一個(gè)例子，使用了chomp，需要的朋友可以參考下2013-02-02
perl跳過(guò)首行讀取文件的實(shí)現(xiàn)代碼
要求直接跳過(guò)第一行，然后讀取后面的內(nèi)容，以下代碼來(lái)自網(wǎng)絡(luò)，感謝原作者的辛苦勞動(dòng)，順祝新年快樂(lè)2013-02-02
今天小編就為大家分享一篇關(guān)于perl6垃圾收集的文章，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來(lái)看看吧2018-10-10
在perl中用{}修飾變量名，可以防止 _ 被解釋為變量名的一部分2013-02-02
這篇文章主要介紹了perl與shell獲取昨天、明天或多天前的日期的代碼,需要的朋友可以參考下2014-04-04
這篇文章主要介紹了Perl中的單行注釋和多行注釋語(yǔ)法,本文還同時(shí)講解了其它常見編程語(yǔ)言的單行注釋和多行注釋語(yǔ)法,需要的朋友可以參考下2015-06-06
Perl實(shí)現(xiàn)的Linux下socket代理服務(wù)器
這篇文章主要介紹了Perl實(shí)現(xiàn)的Linux下socket代理服務(wù)器,比較簡(jiǎn)潔的一個(gè)版本,需要的朋友可以參考下2014-08-08