foreach my $place ( @{$library->{place}} ) {
  foreach my $country ( @{$place->{country}}) {
     if ($country eq 'SouthAfrica') {