Re: Genbank file parsing

[perlsen]

in reply to Genbank file parsing

Hi, Just try this simple

undef $/;
open (IN, "$ARGV[0]");
my $string=<IN>;
close(IN);
(@arr)=$string =~ m#ORIGIN(.*?)//#gsi;
print @arr;