my %codeMap = ( US => { country => 'USA', currency => 'USD'} );
my %currencyMap = map { $codeMap{$_}{currency} => $_ } keys(%codeMap);
my %countryMap = map { $codeMap{$_}{country} => $_ } keys(%codeMap);