Perl怎么初始化一个100个元素全是0的数组

[GaoXX]

RT

[xyzxyz1111]

(0) x 100;

[secyou]

如下：注意 是 xyz的x，不是*或其他；

@a=0 x 100;
print @a;