my @Motif = split(//,'$origin[$y]'); # This is a loop to get the motif template from origin8 #### # This is a loop to get the motif template from origin8 my @Motif = split(//,$origin[$y]);