いきなり結論 3次元配列を0初期化する場合。 @multi_array=map{[map{[map{0}(0..2)]}(0..4)]}(0..7); #multi_array[8][5][3] でも、普通にこっちのほうがいいよ my @array; for my $i(0..7){ for my $j(0..4){ for my $k(0..2){ $array[$i][$j][$k]=0; } } }…

Perlの多次元配列の初期化を1行で書いてみたけど、やめたほうがいい