Select Code to Download

$countryMap = [
    {
...
    },
    ....
];

sub getem {
    my $data = shift;
...
        }
    }
}

my $result = getem($countryMap,'US','country','shortcountry');