如何操作文件中的列表？

Question

我想在每行上带一个带有名字的文本文件,例如:

名称1
名称2
名称3
等

并准备他们的格式的Android数组:

<item>Name 1</item>
<item>Name 2</item>
<item>Name 3</item>
<item>etc.</item>

阵列很长,超过1000个项目.现在,我意识到我实际上是在请求某人为我编写代码.我曾经对perl有点精通,但却对它失去了联系.

是否有任何perl大师谁不介意协助我这个？

Answer 1

这可以直接从命令行完成:

perl -ne 'chomp; print "<item>$_</item>\n"' oldfile > newfile

如果你真的需要它在一个程序中:

while (<>) {
    chomp;
    print "<item>$_</item>\n";
}

Answer 2

与@ sidyll类似,但更短:

perl -lpe '$_="<item>$_</item>"' oldfile > newfile