http://qs1969.pair.com?node_id=534107

my @name= ( "$Address{Andrew}->{Name}->{First}", "$Address{Andrew}->{Name}->{Middle}", "$Address{Andrew}->{Name}->{Last}" );