亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

  免費(fèi)注冊(cè) 查看新帖 |

Chinaunix

  平臺(tái) 論壇 博客 文庫(kù)
最近訪問(wèn)板塊 發(fā)新帖
查看: 2242 | 回復(fù): 4
打印 上一主題 下一主題

perl 提取大文件緊急求救 [復(fù)制鏈接]

論壇徽章:
0
跳轉(zhuǎn)到指定樓層
1 [收藏(0)] [報(bào)告]
發(fā)表于 2008-10-20 20:16 |只看該作者 |倒序?yàn)g覽
本人要處理一個(gè)3.5G的文件,就是把其中的行(行號(hào)已知)提取出來(lái)處理。
比如說(shuō)我要提取14978234-14978238行,能否有快的提取方法?十分感謝!

論壇徽章:
0
2 [報(bào)告]
發(fā)表于 2008-10-20 20:27 |只看該作者
#!perl -w


open FILE,"file.txt" or die "open file error!";
$start=123456;#開(kāi)始行
$end=123499;#結(jié)束行
$i=0;
$^I =".bak";
while(<FILE>) {
       $i++;
        next if $i<$start;
        last  if  $i>$end;
        print ;
}
close FILE;


[ 本帖最后由 machine 于 2008-10-20 20:33 編輯 ]

論壇徽章:
0
3 [報(bào)告]
發(fā)表于 2008-10-20 22:33 |只看該作者
my $start=123456;#開(kāi)始行
my $end=123499;#結(jié)束行
while (<FILE>) {
print if $start .. $end;
}

論壇徽章:
3
戌狗
日期:2014-09-10 17:07:162015年辭舊歲徽章
日期:2015-03-03 16:54:15wusuopu
日期:2016-06-17 17:43:45
4 [報(bào)告]
發(fā)表于 2008-10-21 01:09 |只看該作者
每行長(zhǎng)度不等的話(huà),不好用seek

論壇徽章:
0
5 [報(bào)告]
發(fā)表于 2008-10-21 11:34 |只看該作者

回復(fù) #1 Doubleben 的帖子

如果知道文件的總行數(shù),要查找的行又比較靠文件尾,
可以先用seek到文件尾,然后往回找
會(huì)比較快,否則用2、3樓的方法還是比較直接
您需要登錄后才可以回帖 登錄 | 注冊(cè)

本版積分規(guī)則 發(fā)表回復(fù)

  

北京盛拓優(yōu)訊信息技術(shù)有限公司. 版權(quán)所有 京ICP備16024965號(hào)-6 北京市公安局海淀分局網(wǎng)監(jiān)中心備案編號(hào):11010802020122 niuxiaotong@pcpop.com 17352615567
未成年舉報(bào)專(zhuān)區(qū)
中國(guó)互聯(lián)網(wǎng)協(xié)會(huì)會(huì)員  聯(lián)系我們:huangweiwei@itpub.net
感謝所有關(guān)心和支持過(guò)ChinaUnix的朋友們 轉(zhuǎn)載本站內(nèi)容請(qǐng)注明原作者名及出處

清除 Cookies - ChinaUnix - Archiver - WAP - TOP