sub compileserverhash
{
   my %hash;

# ....

   return \%hash;
}