anchor.diff:      {ok, J} = inet_res:nnslookup("example.com", any, naptr, AddressesWithPorts, 10000),
       {ok, K} = inet_res:nnslookup("example.com", any, axfr, AddressesWithPorts, 10000),
       io:format("Results: ~n"
  -               "A: ~p~n"
  -               "AAAA: ~p~n"
  -               "SRV: ~p~n"
  -               "CNAME: ~p~n"
  -               "NS: ~p~n"
  -               "MX: ~p~n"
  -               "SPF: ~p~n"
  -               "TXT: ~p~n"
  -               "SOA: ~p~n"
  -               "NAPTR: ~p~n"
  -               "AFXR: ~p~n",
  -               [A, B, C, D, E, F, G, H, I, J, K]).
  +              "A: ~p~n"
  +              "AAAA: ~p~n"
  +              "SRV: ~p~n"
  +              "CNAME: ~p~n"
  +              "NS: ~p~n"
  +              "MX: ~p~n"
  +              "SPF: ~p~n"
  +              "TXT: ~p~n"
  +              "SOA: ~p~n"
  +              "NAPTR: ~p~n"
  +              "AFXR: ~p~n",
  +              [A, B, C, D, E, F, G, H, I, J, K]).
  
positive.code: -module(erldns_SUITE).
  %% API
  -export([all/0,
      init_per_suite/1,
      end_per_suite/1,
      init_per_testcase/2]).
  
  -export([mnesia_API_test/1,
           json_API_test/1,
  
negative.code:     ok = erldns_storage:create(authorities),
      mnesia:wait_for_tables([authorities], 10000),
      AUTH1 = #authorities{owner_name = <<"Test Name">>, ttl = 1, class = <<"test calss">>, name_server = <<"Test Name Server">>,
                           email_addr = <<"test email">>, serial_num = 1, refresh = 1, retry = 1, expiry = 1, nxdomain = <<"test domain">>},
      AUTH2 = #authorities{owner_name = <<"Test Name">>, ttl = 1, class = <<"test calss">>, name_server = <<"Test Name Server">>,
                           email_addr = <<"test email">>, serial_num = 1, refresh = 1, retry = 1, expiry = 1, nxdomain = <<"test domain">>},
      AUTH3 = #authorities{owner_name = <<"Test Name">>, ttl = 1, class = <<"test calss">>, name_server = <<"Test Name Server">>,
                           email_addr = <<"test email">>, serial_num = 1, refresh = 1, retry = 1, expiry = 1, nxdomain = <<"test domain">>},
      ok = erldns_storage:insert(authorities, AUTH1),
      ok = erldns_storage:insert(authorities, AUTH2),
      ok = erldns_storage:insert(authorities, AUTH3),
  