my @out= (b,a,c,d,a,b,f,g,a,c,g);
my @out1=(1,2,3,1,2,3,4,5,2,3,2);#the numbers declares how many times the letters from the @out are found