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:     ok = erldns_storage:insert(zones, {<<"Test Name">>, ZONE5}),
      %%Iterate through table and see all the entrys.
      Iterator =  fun(Rec,_)->
          io:format("~p~n",[Rec]),
          []
      end,
      erldns_storage:foldl(Iterator, [], zones),
      erldns_storage:select(zones, <<"TEST NAME 1">>),
      ok = erldns_storage:delete(zones, <<"TEST NAME 1">>),
  
negative.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,
  