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

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

Dump (\%arr);