my $phashref = { name => 1, address => 2, city => 3, state => 4 };
my %people = ( 7 =>[$phashref, 'Bob Jones', '555 Anywhere Street', 'Allentown', 'Pennsylvania' ],
               3 =>[$phashref, 'Pete Hollister', '222 Northview Drive', 'Shoreham', 'unknown' ] );

my $idnumber = 3;
print $people{ $idnumber }->{ name } . "\n";
print $people{ $idnumber }->[1];