Help for this page

Select Code to Download

Select or download this

elsif (m/, Homo sapiens/)
        
        { my ($human) = m/((?:XP_|NP_)[\d. ]+)\s+/; 
...
            $human = $1;
       
        print OUTFILE $1 . "\t";