my $array = [ ($x) x $n ];
  return $array;