perl perl对m x n类似表进行按列排序的代码
人气:0想了解perl对m x n类似表进行按列排序的代码的相关内容吗，在本文为您仔细讲解perl的相关知识和一些Code实例，欢迎阅读和指正，我们先划重点：perl，下面大家一起来学习吧。
操作csv这样的表格在perl处理文件中是经常要碰到的。这样的表类似二维数组，因此实际上的操作时对二维数组的操作了。
对这样的行列表格，我们常常需要按照某列，或者先按照某列，再按另一列进行排序，这里贴上perl的实现，以便下次使用查找。
看下面这段代码。
复制代码 代码如下:
#!/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";
}
注意：
对于大的文件，最好不要这么用。
该脚本会把数据全部搬到内存。
加载全部内容