for my $key ( keys %citystate ) {