Perl 에서 array 를 n개의 같은 값으로 초기화하는 방법

 my $s = 6 x 10;  
 my @a = (6) x 10;  
 print $s; print "\n";  
 printDS(\@a);  
   
 sub printDS  
 {  
      my $ds = shift;  
      use Data::Dumper;   
      print Dumper @$ds;  
      print "\n";   
 }   

키워드 : same value
검색어 : perl initialize array with same number