Select Code to Download

 # example: build a 10x10 boolean field on a hash key
 my $key='10x10';   
...
             int(rand()+0.5);
    }
 }

 for my $row (0..9) {
    for my $col (0..9) {
       print "{$key} => [$row][$col] = $hash{$key}[$row][$col] \n"
    }
 }