问题描述
我有一个目录文件的完整，我需要拉页眉和页脚了他们。他们是如此使用头部或尾部是行不通的所有变长。每个文件确实有一条线，我可以寻找，但我不希望在结果中包括行了。
I have a directory full of files and I need to pull the headers and footers off of them. They are all variable length so using head or tail isn't going to work. Each file does have a line I can search for, but I don't want to include the line in the results.
它通常是
*** Start (more text here)
和结尾
*** Finish (more text here)
我想要的文件名保持不变，所以我需要覆盖源文件，或写入到不同的目录，我会改写他们自己。
I want the file names to stay the same, so I need to overwrite the originals, or write to a different directory and I'll overwrite them myself.
哦，是的，这是当然的在Linux服务器上，所以我有Perl，sed的，awk中，grep的等。
Oh yeah, it's on a linux server of course, so I have Perl, sed, awk, grep, etc.
推荐答案
尝试..操作符。
# flip-flop.pl
use strict;
use warnings;
my $start = qr/^\*\*\* Start/;
my $finish = qr/^\*\*\* Finish/;
while ( <> ) {
if ( /$start/ .. /$finish/ ) {
next if /$start/ or /$finish/;
print $_;
}
}
ü可以再使用-i perl的开关来更新您的文件（S），像这样......
U can then use the -i perl switch to update your file(s) like so.....
$ perl -i'copy_*' flip-flop.pl data.txt
...这改变data.txt中，但使得复印留存为copy_data.txt。
...which changes data.txt but makes a copy beforehand as "copy_data.txt".
/ I3az /
这篇关于我怎样才能从文件中提取的文本行？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！