foreach ( 
  ( splice(@array, 0, 8) )[1..6] 
) {
  s/\.//g;
  # sichere $_ oder mach sonst was damit...
} # foreach