{
local $^W=0;
$::subcountry_lookup{$country_name}{_code_keyed}{$sub_country_code} = $sub_country_name;

$::subcountry_lookup{$country_name}{_full_name_keyed}{$sub_country_name} = $sub_country_code;
}