服务器之家

服务器之家 > 正文

perl对m x n类似表进行按列排序的代码

时间:2020-06-08 10:48     来源/作者:脚本之家

操作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";
}


注意:
对于大的文件,最好不要这么用。
该脚本会把数据全部搬到内存。

 

标签:

相关文章

热门资讯

歪歪漫画vip账号共享2020_yy漫画免费账号密码共享
歪歪漫画vip账号共享2020_yy漫画免费账号密码共享 2020-04-07
2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全
2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全 2019-12-26
沙雕群名称大全2019精选 今年最火的微信群名沙雕有创意
沙雕群名称大全2019精选 今年最火的微信群名沙雕有创意 2019-07-07
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分 2019-06-21
男生常说24816是什么意思?女生说13579是什么意思?
男生常说24816是什么意思?女生说13579是什么意思? 2019-09-17
返回顶部