113763 | Myotonic Dystrophy Type|6737,8200,650,658,112700,8200,100381210,7555,89,98,270,831,825,7555,6261,1180,1158,1346,137200,2997,145800,147421,291,5428,26353,158800,2489,4000,4618,4625,160565,4620,1180,1760,160990,8106,167600,167700,6329,10008,6329,4000,4625,8090,212160,2548,5837,5213,6566,64374,253320,825,8291,6445,2218,22954,8291,285489,375790,254950,254960,1376,23479,7170,58,57190,6261,1180...
by 轻易南村 - Perl - 2012-03-21 00:46:03 阅读(2742) 回复(9)
想根据文件中被一行的内容做判断 满足条件就删除该行 该如何实现呢?
1.txt :
123 hehe
234 haha
345 heha
先删除包含hehe的行
open HEHE,"./1.txt";
while(
我需要对一个被实时访问的列表文件进行处理,删除里面符合匹配条件的行,想破了头都不知道怎么做,哪位给提个醒? 比如列表文件如此: 123,20060319091100,ABC,DEF 456,20060319093021,SDF,FGHG 这是一个用“,”分割的普通文本文件,其中第二列里面包含日期和时间信息,记录都是按时间增长的,就是说相当于按第二列排序了。我用perl要在里面找出3天前的行并删除这些匹配行,例如2006年3月20日执行时,从头检查第二列内容的前8位...
由于此文件数据太多,几百万条,现在就取十条进行处理: 198610000|60105070808|20110104141951|131| 198610002|60135552461|20110129094124|131| 198610013|60148559455|20100824115919|106| 198610013|60135435100|20100824120109|106| 198610013|60198413489|20100824120447|106| 198610013|60135435100|20100824120315|106| 198610013|60135435100|20100824120926|106| 198610013|60195864436|20100918175612|106| 198610014|6...
linux的log文件,类似:
Jan 27 21:40:17 linux-123 rcpowersaved[4337]: enter 'CPUFREQ_ENABLED=no' in /etc/powersave/cpufreq to avoid this warning.
Jan 27 21:42:19 linux-123 haadmin[4623]:
最近学习了perl异步模块Coro和perl非阻塞的AnyEvent::HTTP模块,为了更深入的学习异步编程思想,准备写个入门程序。 最合适的就是爬虫了,我是用Coro的信号控制HTTP请求数量的,入口是一个网站主页,只准备抓一个站点。 有一个%root的hash变量,用来将站点的所有URL层次化的保存在%root里面,并保存抓取状态(是否已抓取)。 sub URL_add { # $p用于指向%root各个层次的指针 my $p = shift; my $url = shift;...
我有一个xml文件如下:
假如现在有一个文件A,类似这样: name W X Y Z a 2 1 4 8 b 3 0 3 7 b 4 0 4 7 c 2 3 5 6 c 1 3 5 6 c 2 2 5 6 d 8 0 6 4 ........ 其中name下b和c有重复,现在想将其合并求和然后作为单独的b/c输出,像这样: name W X Y Z a 2 1 4 8 b 7 0 7 14 c 5 8 15 18 d 8 0 6 4 .....