多次元配列のアクセス

for文をネストする
          for my $row (@a) {
              for my $elem (@{$row}) {
                  $elemを使う
              }
          }
          for my $row (@$r) {
              for my $elem (@{$row}) {
                  $elemを使う
              }
          }
インデックスが数字で必要な場合
行列の転置を計算する場合など
          for (my $y=0; $y <= $#a; $y++) {
              for (my $x=0; $x <= $#{$a[$y]}; $x++) {
                $a[$y][$x]を使う
              }
          }
          for (my $y=0; $y <= $#{$r}; $y++) {
              for (my $x=0; $x <= $#{$r->[$y]}; $x++) {
                $r->[$y][$x]を使う
              }
          }