Select Code to Download

>sp|P49929|SC52_SHEEP 
DITCAEPQSVRGLRRLGRKIAHGVKKYG
>gi|1771590|emb|CAA70562.1| temporin B precursor MFTLKKSLLLLFFLGTINLSL
+CEEERNAEEERRDEPDERDVQVEKRLLPI

sp == P49929
gi == 1771592

 ##$lines contains the string to be matched 
 if(/^>(\w+)\|(.*)?\|.*?$line.*\n/i){
...
         print OUT "$_";
         print "$1 == $2\n";    
}