foreach ( @{$people[0]} ) {
    print $_->name;
}