小贴士: 用perl循环文件进行字符处理
如果想对一个文件进行处理,要求从第二行开始每行前面递增的加空格,第二行前面加一个空格,第3行前面加2个空格依次类推,比如文档内容如下:
cat aa.txt
aaa
bbb
ccc
ddd
eee
希望显示的结果为:
aaa
bbb
ccc
ddd
eee
这样的需求实现起来也是非常容易的,直接利用perl对整个文档进行循环:
[root@vms63 ~]# cat aa.txt | perl -e '$i=0;while(<>){print " "x "$i","$_";$i++};'
aaa
bbb
ccc
ddd
eee
[root@vms63 ~]#