anchor.diff:  -define(SOCKS_PORT,1080).
   -define(CONNECTION_TIMEOUT, 20000).
   -define(CACHE_EXPIRED,3600).
  +-define(CACHE_GET, 'get').
  +-define(CACHE_SAVE, save).
  +-define(CACHE_REMOVE, remove).
   
   -type state() :: init|hello|connected.
   
  
positive.code:     end.
  
  url_to_ip(URL) ->
      %%io:format("The URL = ~p need to transfer to ip ~n", [URL]),
      IP = get_ip(URL),
      case IP of
          undefined ->
  
negative.code:                     store_ip(URL, Addr),
                      Addr;
                  error ->
                      error_msg("Failed to get ip address, URL = ~p",[URL]),
                      {{},0}
              end;
          IP -> IP
  