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