Select Code to Download

open my $uniqueFH, '<', $uniqueFile
   or die "open: < $uniqueFile: $!\n";

chomp( my @data_in = <$uniqueFH> );

my %strSpec_protein_hash;
@strSpec_protein_hash{ @data_in } =
   @goodProteins_hash{ @data_in };