http://www.perlmonks.org?node_id=912391


in reply to seperate/extract only annotations from genbank (gbk) file.

perl -ne 'print unless /^ORIGIN$/../^\/\/$/' myfile.gbk

See also: Flipin good, or a total flop?

Good Day,
    Dean

In Section Seekers of Perl Wisdom