sub getIP{
   my $result = $resolver->query($_[0]);
   return $result;
}