my @list = @array[0..8];
s/\.//g foreach @list[1..6];