%hash = (name => foo,
         list => [1, 2, 3]);
print join "\n", (@{$hash{list}});
print "\n${$hash{list}}[1]\n"; # Print 2