数字1を10000個要素に持つ配列 @array = (1) x 10000; 文字列"foo"を10000個要素に持つ配列 @array = ("foo") x 10000; map を使う @array = map { "foo" } (1..10000);