Select Code to Download

my @arr = ([1,2],[3,4]);

...
        print "$_\n";
    }
}

use strict;
use warnings;
...
        print "\$arr[$x][$y] = $arr[$x][$y]\n";
    }
}