2011-03-16 3 views
23

Perl에서 CSV 파일을 조작 할 때 종종 동일한 요소가 몇 개있는 배열을 초기화해야합니다.펄 - n 개의 빈 문자열 또는 0으로 배열을 만드는 법?

my $arr = []; 
for my $i (0..$n-1) { 
    push @$arr, ""; 
} 

더 간단한 형식으로 수행 할 수있는 방법이 있습니까?

완전히 누락 된 열을 추가 할 수 있도록이 표현을 완벽하게하고 싶습니다.

f([@$some_tab, n_elems("", $column_number - scalar(@$some_tab))]); 

함수를 작성하는 방법을 알고 있지만 10 행 스크립트에서는이를 수행하지 않습니다. .

답변

40

승수를 사용하십시오.

my @arr = ("") x $n; 

업데이트 :이 요소는 요소를 복제하므로 참고로 배열을 채우는 것은 바람직하지 않을 수 있습니다. 이 경우 각 요소를 구성해야하는 곳에서 map을 사용할 수 있습니다.

관련 문제