如何提取特定符号行中的关键字并输出随后几行

tingshuibanxia

请教大家，例如有文件A是这样：

>H1_22 ASDSF AA BB 1111
ASDSJFKJKDJF
DSJFKDJFDJDFDFD
>F2_44_3 SDKS BB DF 2323
DFDSFDDGJFGLJFLDL
>SDS_22 DFD AA FDD 1111
FDSFDSFDGDG
FDFDSFDGFDGTHTYU
FDGRFHHHHHHHHHH
.......

如何将以>号开头的行中第3列为AA的行以及随后的几行提取出来？
生成这样：
>H1_22 ASDSF AA BB 1111
ASDSJFKJKDJF
DSJFKDJFDJDFDFD
>SDS_22 DFD AA FDD 1111
FDSFDSFDGDG
FDFDSFDGFDGTHTYU
FDGRFHHHHHHHHHH

elu_ligao

1. awk '/>/{f=$3=="AA"?1:0}f'

复制代码

tingshuibanxia

回复 2# elu_ligao


谢谢，请问？1:0如何理解？

moperyblue

1. awk -vRS='>' '$3=="AA"{printf RS $0}'
   
2. awk '/^>/{f=$3=="AA"}f'
   
3. grep -oPz '>(\S+\s+){2}AA [^>]*'|awk NF
   
4. sed '/>/i \\'|sed -r '/^>(\S+\s+){2}AA\s/{:a;N;/\n$/!{$!ba};s/\n$//;p};d'
   
5. sed -r ':b;/^>(\S+\s+){2}AA\s/{:a;N;/\n>/!{$q;ba};h;s/(.*)\n(.*)/\1/p;g;s//\2/;bb};d'

复制代码

sunzhiguolu

1. perl -ane 'if(/>/){print if($P=$F[2] eq "AA" ? 1 : 0);next}print if($P)' f

复制代码

>H1_22 ASDSF AA BB 1111
ASDSJFKJKDJF
DSJFKDJFDJDFDFD
>SDS_22 DFD AA FDD 1111
FDSFDSFDGDG
FDFDSFDGFDGTHTYU
FDGRFHHHHHHHHHH

Herowinter

回复 3# tingshuibanxia

http://baike.baidu.com/link?url=fqmORbuZS4ZF9quGfaEFyrBEj7b5dNCwnHU1dAcLcA5rCM8ak-z73KwG5_NO-Rhx-ETfFrcLANzBAioebCbFma
   

ll104567

awk '/>/{if($3=="AA"){a=1}else{a=0}}a'
给你翻译一下那个三目运算- -
顺手摸一下5楼pp
=================================防摸pp隔离带=======================================

sunzhiguolu

请叫我俊哥哈

回复 4# moperyblue


    我想请问下，你的第三个代码，就是当匹配到/\n>/，然后保存到保存空间，然后这里的替换 s/(.*)\n(.*)/\1/  

是
>H1_22 ASDSF AA BB 1111
ASDSJFKJKDJF
DSJFKDJFDJDFDFD
>F2_44_3 SDKS BB DF 2323

替换成这个吗？
>H1_22 ASDSF AA BB 1111
ASDSJFKJKDJF
DSJFKDJFDJDFDFD