Select Code to Download

@matrix =([1,5,7],
          [2,3,4],
...
        print "Value $row[$x] at x $x y $y\n";
    }
}

$matrix =[
            [1,5,7],
...
        print "Value $matrix->[$y]->[$x] at y $y x $x\n";
    }
}