my @possible_last_names = 
  map {$_->{lastname}} grep {$_->{firstname} eq "Alice"} values %uid;
# Returns ("Foo")