awk 文件截取

ywlscpl

awk -v RS=ABC 'NR>1&&RT{print RT $0}'

blackold

这个问题用 sed ,grep 也很方便。

expert1

回复 8# blackold

黑哥，RLENGTH是什么情况呢？

   

blackold

回复 13# expert1


   与 match 函数相关的变量，就是正则所匹配字符串的长度。

yinyuemi

1. perl -le '$str="xxx1abcxxx2abcxxx3abcxxx4abcxxx5";$str =~ m{(abc.+$)(?{print $&})(*FAIL)}' # 我只想说perl的正则实在太强大了
   
2. abcxxx2abcxxx3abcxxx4abcxxx5
   
3. abcxxx3abcxxx4abcxxx5
   
4. abcxxx4abcxxx5
   
5. abcxxx5
   

复制代码

ziyunfei

1. echo 'QWADGDABCfooDGJDJLGJWLJABCbarGLDABCK' | ruby -ne '(puts $_=$_[/(?<!^)ABC.*/])while $_'

复制代码

seesea2517

ywlscpl 发表于 2012-03-27 10:49
awk -v RS=ABC 'NR>1&&RT{print RT $0}'

借此想法：

1. echo 'QWADGDABCfooDGJDJLGJWLJABCbarGLDABCwhyJGKABCkkJGJKDJGLABCtnndJDK'|awk -F"ABC" '{while(j++<NF){i=j;while(i++<NF) {printf FS $i} printf RS}}'
   
2. ABCfooDGJDJLGJWLJABCbarGLDABCwhyJGKABCkkJGJKDJGLABCtnndJDK
   
3. ABCbarGLDABCwhyJGKABCkkJGJKDJGLABCtnndJDK
   
4. ABCwhyJGKABCkkJGJKDJGLABCtnndJDK
   
5. ABCkkJGJKDJGLABCtnndJDK
   
6. ABCtnndJDK

复制代码

blackold

还是 sed NB，超短：

1. sed -n '/^ABC/p;s/.\(ABC\)/\n\1/;D'

复制代码

seesea2517

blackold 发表于 2012-03-28 11:39
还是 sed NB，超短：

原来是这样的思路，我还在想着怎么处理贪婪匹配的问题，绕晕了。

yinyuemi

回复 18# blackold


    超短～～