anchor.diff:  true_headers(Req) ->
     [binary_to_list(K) || {K,<<"true">>} <- headers(Req)].
   
  +ets({sizes,Tabs})        -> size_getter([tab(T) || T <- Tabs]);
   ets({keys,Tab})          -> key_getter(tab(Tab));
   ets({insert,Tab,K,V})    -> inserter(tab(Tab),{K,V});
   ets({insert,Tab,KVs})    -> multi_inserter(tab(Tab),KVs);
  
positive.code:     {"PUT",   [Tab|KeyL],[]}          -> je(ets({insert,Tab,KeyL,body(Req)}));
      {"PUT",   [Tab|KeyL],["counter"]} -> ets({counter,Tab,KeyL});
      {"PUT",   [Tab|KeyL],["reset"]}   -> ets({reset,Tab,KeyL});
      {"GET",   [[]]      ,[]}          -> je([l2b(T)||T<-gcall({all,[]})]);
      {"GET",   [Tab]     ,[]}          -> je(ets({keys,Tab}));
      {"GET",   [Tab|KeyL],[]}          -> ets({get,Tab,KeyL});
      {"GET",   [Tab|KeyL],["multi"]}   -> je(ets({multi_get,Tab,KeyL}));
  
negative.code: 
  %% exporting keys
  elems_to_binary(T) ->
    l2b(join(tuple_to_list(T),<<"/">>)).
  
  join([E],_) -> [E];
  join([E|R],D) -> [E,D|join(R,D)].
  