8dab2d56b2
Former-commit-id: 93fac7a70052d06c2a12bf8af59820c653edd31b Former-commit-id: 0869fdad0f550941a0f78f1e4c57f4fcdb3f6076
21 lines
218 B
Awk
21 lines
218 B
Awk
#
|
|
# select subDB from fasta DB
|
|
#
|
|
# -v FILE
|
|
|
|
BEGIN {
|
|
if (FILE == "") FILE = "dbsel.txt"
|
|
while (getline < FILE)
|
|
INC[$1] = $1
|
|
close(FILE)
|
|
}
|
|
|
|
/^>/ {
|
|
name = substr($1, 2)
|
|
ok = name in INC
|
|
}
|
|
|
|
ok {
|
|
print $0
|
|
}
|