C******e
发帖数: 1850 | 1 我有一批数据文件，都是.txt格式，但是每个文件的前40行都是Header，需要删掉或者
在行首加上注释符号“%”，听说用PERL一行命令就够了，可是俺从来没学过PERL，恳
求大侠们帮助，很急迫，谢谢！ |
t****t
发帖数: 6806 | 2 for adding "%"
perl -pi -e 'print "%" if (1 .. 40); close ARGV if eof' your_files
for removing
perl -ni -e 'print unless ( 1 .. 40); close ARGV if eof' your_files |
C******e
发帖数: 1850 | 3 太感谢大侠了，还有一个小问题，如果我还想保留旧文件，把改变后的文件另存为一个
不同名的新文件，应该怎么做？
再次谢过，给您拜年了。
【在 t****t 的大作中提到】
: for adding "%"
: perl -pi -e 'print "%" if (1 .. 40); close ARGV if eof' your_files
: for removing
: perl -ni -e 'print unless ( 1 .. 40); close ARGV if eof' your_files
|
t****t
发帖数: 6806 | 4 perl -pi.bak .....
or
perl -ni.bak .....
(add extra extension after -i)
【在 C******e 的大作中提到】
: 太感谢大侠了，还有一个小问题，如果我还想保留旧文件，把改变后的文件另存为一个
: 不同名的新文件，应该怎么做？
: 再次谢过，给您拜年了。
|
b******n
发帖数: 592 | 5 sed -n '41,$ p' input.txt > output.txt
【在 C******e 的大作中提到】
: 我有一批数据文件，都是.txt格式，但是每个文件的前40行都是Header，需要删掉或者
: 在行首加上注释符号“%”，听说用PERL一行命令就够了，可是俺从来没学过PERL，恳
: 求大侠们帮助，很急迫，谢谢！
|
