my $city_state = “ BELLMONT NY”;
$city_state   = join '', map { ucfirst $city_state } split /\s+/ || '';
# Bellmont NY


##</code><code>##

my $city_state = “ NEW YORK NY”;
$city_state   = join '', map { ucfirst $city_state } split /\s+/ || '';
# New York NY