Help for this page
Select Code to Download
Select
or
download this
@_ = map { 0 } (1..$w*$h);
Select
or
download this
@_ = (0) x ($w*$h);