@_ = map { 0 } (1..$w*$h);

##</code><code>##

@_ = (0) x ($w*$h);