![]() |
|
|
|||||||
![]() |
PERL - Regular expression question... |
|
|
Thread Tools | Search this Thread |
|
|
#1 |
|
What is the best way to take each line beginning with <some_string> and move
it down 5 lines lower in the file? Also, If you want to replace two consecutive blank lines with a single blank line, how do you do it? This isn't working: cat test_file.txt|sed -r 's/[\n\n]/[\n]/' Thanks!! Andrew Munn |
|
|
|
|
#2 |
|
Posts: n/a
|
"Andrew Munn" <> wrote in message news:<bdnkvr$s0k$>...
> What is the best way to take each line beginning with <some_string> and move > it down 5 lines lower in the file? ex -s inputfile <<[EOF] g/^regex/m+5 x [EOF] sed -e '/\n/G;/^regex/{h;N;N;N;N;N;D;}' inputfile note: the outputs of ex and sed would diverge if the next /regex/ is found within the first 5 lines. don't know how to make them same. some sed guru is required for this. > > Also, If you want to replace two consecutive blank lines with a single blank > line, how do you do it? This isn't working: > cat test_file.txt|sed -r 's/[\n\n]/[\n]/' > sed -e '/./!{$!N;/^\n$/s///;}' inputfile |
|