foreach $genes(@genome){
    chomp($genes);