Help for this page
foreach my $x (0..$maxx) { foreach my $y (..$maxy) { if (my $area= get_area($x,$y,virtgridsize,'town')) { ...