my @array = ($x) x $n;
  return \@array;