Re^3: How to match the sequences with headers

[Lotus1]

At the beginning of your program put in $/="\n\n";

Then inside the while loop if $_ matches 'sequence' print $_ to out1; if it matches 'secstr' print $_ to out2.