Select Code to Download

  %hash=("$country"=>{
             "$errorcode=>{
         $messagetype=>{                         "count"=>"value"}}})

if (defined $hash{$country}{$errorcode}{$message}{$count})
    {
...
    {
    $hash{$country}{$errorcode}{$message}{$count}=1;
    }

for $varctry(keys %hash)
{
...
        }
  }
}