如何在匹配文字行内插入一段文字？

如何在匹配文字行内插入一段文字？
各位看官：

  我想处理一批文件，这批文件内如果有： ifdef ... endif 的字样，那就在ifdef和endif之间插入一段文字，注意文字是一段啊，不是一行啊。
  请问该怎样在perl内实现啊，用正则表达式能行吗？ 用什么结构来做呢？

请各位指点！

正则表达式 就可以。
现在想到的方法就是逐行读，在每一行里找到 ifdef, 然后就看你要往哪里插一段文字了。

如果不了解 perl 的话，看看怎么读文件和正则。

插一段文字和一行文字 有什么区别么？
注意处理下换行符就OK了吧