Help for this page

Select Code to Download

Select or download this

my $matrix;
{
  my @row = (0) x $width;
  $matrix = [map {[@row]} 1..$height];
}