#!/usr/bin/perl -w use strict; while (<DATA>) { if (/ORIGIN/ .. /\/\//) { print; } } __DATA__ # extract of file: #=============== FEATURES Location/Qualifiers /note="blah blah" COUNT 200 ORIGIN 1 lots of nice info 61 lots of nice info 121 lots of nice info //
In reply to Re: Genbank file parsing
by ercparker
in thread Genbank file parsing
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |