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