$n = 8;  @n = (1..$n);