¿De qué forma puedo almacenar múltiples valores en una table hash?

~> more test.pl

%chums = ( "Allan" => {"Boss" => "George", "Status" => "Contractor"},

		   "Bob" => {"Boss" => "Peter", "Status" => "Part-time"} );



print $chums{"Allan"}{"Boss"}."\n";

print $chums{"Bob"}{"Boss"}."\n";

print $chums{"Bob"}{"Status"}."\n";

$chums{"Bob"}{"Wife"} = "Pam";

print $chums{"Bob"}{"Wife"}."\n";



~> perl test.pl

George

Peter

Part-time

Pam