国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > Perl > 正文

perl大文件讀取處理的模塊介紹

2020-06-04 20:29:42
字體:
來源:轉載
供稿:網友

該模塊用perl的數組代表一個文件,文件的每一行對應數組的一個元素,第一行為元素0,第二回為1,... 
文件本身實際并不加載到內存,對數組元素的操作立刻作用到文件里。最大的方便是可以任意指定處理開頭結尾的某幾行。

基本用法:

代碼如下:
use Tie::File;
tie @array, 'Tie::File', filename or die ...;
$array[13] = 'blah'; # line 13 of the file is now 'blah'
print $array[42]; # display line 42 of the file
$n_recs = @array; # how many records are in the file?
$#array -= 2; # chop two records off the end

for (@array) {
s/PERL/Perl/g; # Replace PERL with Perl everywhere in the file
}
# These are just like regular push, pop, unshift, shift, and splice
# Except that they modify the file in the way you would expect
push @array, new recs...;
my $r1 = pop @array;
unshift @array, new recs...;
my $r2 = shift @array;
@old_recs = splice @array, 3, 7, new recs...;
untie @array; # all finished

更多功能請大家參考cpan上的文檔。

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 浑源县| 泽普县| 晋城| 华安县| 广德县| 琼海市| 永康市| 东至县| 政和县| 大冶市| 盈江县| 新源县| 东乌珠穆沁旗| 临江市| 曲水县| 呼伦贝尔市| 太保市| 甘南县| 玉树县| 肇源县| 伊春市| 靖边县| 自治县| 宁津县| 鸡泽县| 方城县| 浪卡子县| 临沂市| 犍为县| 江城| 依兰县| 旌德县| 宁波市| 大荔县| 正蓝旗| 库尔勒市| 金川县| 台南县| 东光县| 巨野县| 惠安县|