Select Code to Download

%people=( 
'Jones'=>{'name'=>'Alison', 'age'=>15, 'pet'=>'dog',},
...
{
print "Key is $key", "value is %{$people{$key}}";
}

Key is smith value is #{HASH(0x2251d0)} Key is Jones value is %{HASH(0
+x2250c8)}