my %hash; $hash{test} = {}; push @{$hash{test}}, 1, 2; use Data::Dumper; print Dumper \%hash;