Select Code to Download

open (PIR,'file.txt');
while (<PIR>)
...
    else {
        push @se, $_;
    }

ENTRY            CCHU       #type complete
TITLE            cytochrome c [validated] - human
...
ORGANISM         #formal_name Macaca mulatta #common_name rhesus macaq
+ue
ACCESSIONS       A00003
GDVEKGKKIFIMKCSQCHTVEKGGKHKTGPNLHGLFGRKTGQAPGYSYTAANKNKGITWGEDTLMEYLEN
+PKKYIPGTKMIFVGIKKKEERADLIAYLKKATNE