菜鳥請教

gis11rj

用perl 修改文件內(nèi)容，只讀入不寫入可以嗎？

jason680

回復(fù) 1# gis11rj


請教一下....什么叫"修改"....

afukada

要讀檔就

open(FILEHANDLE,File Name)

File Name就是你要讀的檔名

不懂樓主想要問的問題

gis11rj

回復(fù) 2# jason680


    就是需要修改原文件的某些內(nèi)容，做某些標(biāo)點符號的替換工作

gis11rj

回復(fù) 3# afukada


    先讀入做完修改，不寫入那個文件會生效嗎

sosflyer

回復(fù) 5# gis11rj


    就是想要直接修改嘛，有個$^I變量你可以看看。

afukada

我想我"也許"知道樓主想法

你可以先讀檔修改完之後在寫到另一個檔案去

比方說

open(input,input_file);

while(<input>)#使用while一次處理一行
{
  ...#要處理的部分
  push(@array,$_);#把處理完的結(jié)果push到一個array裡面
}

close(input);

open(output,">".output_file)

foreach(@array)#利用foreach把結(jié)果給print到ouput_file裡面
{
  print output $_,"\n";
}

或是使用這個做法

open(input,input_file);
@array=<input>;#直接將每一行都讀進去array裡面
close(input);

open(output,output_file);

foreach(@array)
{
  ...#對array裡面的element做處理
  print output $_,"\n";
}

close(output);

--
才剛回完就發(fā)現(xiàn)有人說是要直接修改

要直接修改的話確實用$^I就可以了

gis11rj

回復(fù) 7# afukada


    嗯嗯，就是這個意思，謝謝！o(∩∩)o...