my %CountryCode = { 
   'com','Comercial', 
   'uk','The United Kingdom',
}  # a hash of country name

##</code><code>##

my %CountryCode = (
   'com','Comercial',
   'uk','The United Kingdom'
);

# a hash of country names

##</code><code>##

if ($Country == $key){ #get the key of country name
   $CountryName = $CountryCode($key); #assign the key value to a variable
}