请教

huaxue

一个文本文件，我如何在某个特定行之后插入一段信息。
例如:
aaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbbbbbbb
cccccccccccccccccccccccc
hello
dddddddddddddddddd
在"hello"这行之后添加信息" happy new year",得到新的文本如下：
aaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbbbbbbb
cccccccccccccccccccccccc
hello
happy new year
dddddddddddddddddd

huaxue

不知道有没有什么函数可以直接做，谢谢！

atgc

more aa.txt
aaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbbbbbbb
cccccccccccccccccccccccc
hello
dddddddddddddddddd


open F,"aa.txt";
while(<F>)
{
        chomp;
        if (/^hello/)
        {
                print "$_\nHappy new year\n";
        }
        else
        {
                print "$_\n";
        }
}
close(F);

兰花仙子

原帖由 huaxue 于 2007-1-11 11:59 发表
一个文本文件，我如何在某个特定行之后插入一段信息。
例如:
aaaaaaaaaaaaaaaaaa
bbbbbbbbbbbbbbbbbb
cccccccccccccccccccccccc
hello
dddddddddddddddddd
在"hello"这行之后添加信息" hap ...

1. perl -pi -e 's/^hello$/hello\nhappy new year/'  file.txt  

复制代码