Select Code to Download

use warnings;
use strict;
...
push @{$arr[1][1]}, 222;

Dump (\@arr);

$ARRAY1 = [
            [
...
              ]
            ]
          ];

use warnings;
use strict;
...
push @{$arr{'two'}}, 222;

Dump (\%arr);

$HASH1 = {
           one => [
...
                    222
                  ]
         };