my %hash = ( foo => [ ] );
push @{ $hash{foo} }, "a string";
print $hash{foo}->[0];

__output__

a string