Wire post by Manisha Mishra

By Manisha Mishra 2568 days ago
Extract fasta with Ids. $ perl -ne 'if(/^>(\S+)/){$c=grep{/^$1$/}qw(id1 id2)}print if $c' fasta.file #extract #fasta #sequence #ids