my %hash = ();
my @array = qw(1 2 3 4 5);
$hash{Array} = \@array;