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
@a = (0) x 10;
ReplyDelete으로 해야될것 같은데요..