免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2186 | 回复: 6

排序,帮修改下我的一小段CODE,谢谢! [复制链接]

论坛徽章:
0
发表于 2007-12-24 10:28 |显示全部楼层
T2.txt:
windows.wang@163.com
qi.zhang@gg.com
liu.lin@263.net
feng.zhen@gg.com
yun.song@gg.com
我想找出以@gg.com结尾的所有的mail address,并将@gg.com前面的部分按顺序排序。

#!/usr/bin/perl

use strict;
open (T2,"T2.txt") or die "$!";
while (my $line=<T2>){
  if ($line=~/(.*)\@gg.com/){
    my @en=push my @en ,$1;
    print @en;
  }
}

小弟不明白的是:@en=sort {$a cmp $b} @en;这句该放在程序的什么地方?总对程序运行流程不太熟悉,哎!
上面是小弟的思路,或许有更好的解决办法,但是我现在能想到的也就这个思路了,大家在上面思路的基础上帮修改下吧,但愿写多了就会熟悉了吧!谢谢了!

[ 本帖最后由 windows.li 于 2007-12-24 10:29 编辑 ]

论坛徽章:
0
发表于 2007-12-24 11:34 |显示全部楼层
你先在while循环里面,把他们都push进数组。
然后结束循环之后,再对数组排序输出就可以了。

论坛徽章:
0
发表于 2007-12-24 11:40 |显示全部楼层
my @en=push my @en ,$1;

这段代码得到是3.最好把赋值除掉。
然后 @zhang=sort {$a cmp $b} @en;
print 就可以出来了。

我改了一点代码,你看看吧
#!/usr/bin/perl

use strict;
my (@en,@ke,@zhang);
open (T2,"id.txt") or die "$!";
while (my $line=<T2>){
&nbsp;&nbsp;if ($line=~/(.*)\@gg.com/){
&nbsp;&nbsp;&nbsp;push @en ,$1;

&nbsp;&nbsp;}
}
@zhang=sort {$a cmp $b} @en;
&nbsp;print join "\n",@zhang;


[ 本帖最后由 zhangkeyijian 于 2007-12-24 11:42 编辑 ]

论坛徽章:
0
发表于 2007-12-24 12:28 |显示全部楼层
谢谢!

[ 本帖最后由 windows.li 于 2007-12-24 12:45 编辑 ]

论坛徽章:
0
发表于 2007-12-24 12:45 |显示全部楼层
谢谢!

[ 本帖最后由 windows.li 于 2007-12-24 12:46 编辑 ]

论坛徽章:
15
2015年辞旧岁徽章
日期:2015-03-03 16:54:15双鱼座
日期:2015-01-15 17:29:44午马
日期:2015-01-06 17:06:51子鼠
日期:2014-11-24 10:11:13寅虎
日期:2014-08-18 07:10:55酉鸡
日期:2014-04-02 12:24:51双子座
日期:2014-04-02 12:19:44天秤座
日期:2014-03-17 11:43:36亥猪
日期:2014-03-13 08:13:51未羊
日期:2014-03-11 12:42:03白羊座
日期:2013-11-20 10:15:18CU大牛徽章
日期:2013-04-17 11:48:45
发表于 2007-12-24 14:10 |显示全部楼层
原帖由 windows.li 于 2007-12-24 10:28 发表
T2.txt:
windows.wang@163.com
qi.zhang@gg.com
liu.lin@263.net
feng.zhen@gg.com
yun.song@gg.com
我想找出以@gg.com结尾的所有的mail address,并将@gg.com前面的部分按顺序排序。

#!/usr/bin/per ...

给个unix脚本解决同样的问题

grep @gg.com$ T2.txt |sort

论坛徽章:
0
发表于 2007-12-24 14:41 |显示全部楼层
恩,是的,我想复杂了,谢谢楼上的朋友!
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

DTCC2020中国数据库技术大会

【架构革新 高效可控】2020年12月21日-23日第十一届中国数据库技术大会将在北京隆重召开。

大会以“架构革新 高效可控”为主题,设置2大主会场,20+技术专场,将邀请超百位行业专家,重点围绕数据架构、AI与大数据、传统企业数据库实践和国产开源数据库等内容展开分享和探讨,为广大数据领域从业人士提供一场年度盛会和交流平台。
http://dtcc.it168.com


大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP