Select Code to Download

$matrix{'a,4'} = 20;
$matrix{'b,5'} = 30;

for my $x ('a'..'g') {
  for my $y (1..6) {
...
    ...
  }
}