删除第一个选项卡和最后一个分号之间的所有内容

时间:2012-12-20 14:16:05

标签: perl

我有一个文件,其行如下:

EF457507|S000834932     Root;Bacteria;"Acidobacteria";Acidobacteria_Gp4;Gp4
EF457374|S000834799     Root;Bacteria;"Acidobacteria";Acidobacteria_Gp14;Gp14
AJ133184|S000323093     Root;Bacteria;Cyanobacteria/Chloroplast;Cyanobacteria;Family I;GpI
DQ490004|S000686022     Root;Bacteria;"Armatimonadetes";Armatimonadetes_gp7
AF268998|S000340459     Root;Bacteria;TM7;TM7_genera_incertae_sedis

我想在第一个标签和最后一个分号之间打印任何东西,比如

EF457507|S000834932     Gp4
EF457374|S000834799     Gp14
AJ133184|S000323093     GpI
DQ490004|S000686022     Armatimonadetes_gp7
AF268998|S000340459     TM7_genera_incertae_sedis

我尝试使用正则表达式,但它不起作用,有没有办法用Linux,awk或Perl做到这一点?

1 个答案:

答案 0 :(得分:5)

您可以使用sed

sed 's/\t.*;/\t/' file

## This matches a tab character '\t'; followed by any character '.' any number of
## times '*'; followed by a semicolon; and; replaces all of this with a tab 
## character '\t'.

sed 's/[^\t]*;//' file

## Things inside square brackets become a character class. For example, '[0-9]' 
## is a character class. Obviously, this would match any digit between zero and
## nine. However, when the first character in the character class is a '^', the
## character class becomes negated. So '[^\t]*;' means match anything not a tab
## character any number of times followed by a semicolon.

awk

awk 'BEGIN { FS=OFS="\t" } { sub(/.*;/,"",$2) }1' file

awk '{ sub(/[^\t]*;/,"") }1' file

结果:

EF457507|S000834932     Gp4
EF457374|S000834799     Gp14
AJ133184|S000323093     GpI
DQ490004|S000686022     Armatimonadetes_gp7
AF268998|S000340459     TM7_genera_incertae_sedis

根据以下评论,使用sed删除最后一个分号后面的所有内容:

sed 's/[^;]*$//' file

## '[^;]*$' will match anything not a semicolon any number of times anchored to 
## the end of the line.

awk

awk 'BEGIN { FS=OFS="\t" } { sub(/[^;]*$/,"",$2) }1' file

awk '{ sub(/[^;]*$/,"") }1' file