open涵式問題

fr222093

請教一下open的問題，我有一個txt的文檔 內容如下:
                                                          number     112,224,52,31
                                                          name         lin,jerry,julia,fire
                                                          addre        中國,美國,韓國
假使我想一直在name欄的fire後面增添新名字，添加完以後第二次又能在添加新名字，我該怎麼做呢? 能給方法嗎  感謝
                                                         

qq27898

用Tie::File试试，这个模块可以建立一个list和file的关系，对list的操作相当于对file的操作

use Tie::File;
my @array;
my @filename="yourfilename.txt";
tie(@array,'Tie::File',$filename) or die;
$array[2] .= "newname";
untie @array;

rubyish

回复 2# qq27898


    学习了~ 3Q

qq27898

回复 3# rubyish

。。。心里好忐忑，我是新手，不知道回答的对不对

你这么一回复我好忐忑…………
   

帅哥已注册

#number     112,224,52,31
#name         lin,jerry,julia,fire
#addre        中國,美國,韓國

运行perl demo.pl AAAA "filename.txt"

my $newname = shift;
$^I=".bUk";
while(<>){
        s/(name\s+.*)/$1,$newname/;
        print;
}