foreach my $key ( keys %{$library->{place}} )