use warnings;
use strict;
use Data::Dump::Streamer;
 
my @arr=(["one" => [1,11]], ["two"=> [2,22]]);

push @{$arr[1][1]}, 222;

Dump (\@arr);

##</code><code>##

$ARRAY1 = [
            [
              'one',
              [
                1,
                11
              ]
            ],
            [
              'two',
              [
                2,
                22,
                222
              ]
            ]
          ];

##</code><code>##

use warnings;
use strict;
use Data::Dump::Streamer;
 
my %arr= ("one" => [1,11], "two"=> [2,22]);

push @{$arr{'two'}}, 222;

Dump (\%arr);

##</code><code>##

$HASH1 = {
           one => [
                    1,
                    11
                  ],
           two => [
                    2,
                    22,
                    222
                  ]
         };