Hi, You can fix Locale::SubCountry by encapsulating line 439 in a no warning block.

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

$::subcountry_lookup{$country_name}{_full_name_keyed}{$sub_country_nam
+e} = $sub_country_code;
}
[download]