anchor.diff:      N -> string:substr(Path, 1, string:len(Path) - (N+1))
     end.
   
  +% Query about the top level request path is
   top_level_request(Path) ->
     case string:tokens(Path, "/") of
       [CleanPath|_Others] -> CleanPath;
  
positive.code:   {struct, Struct} = mochijson2:decode(Data),
    Struct.
  
  subst(Template, Values) when is_list(Values) ->
    list_to_binary(lists:flatten(io_lib:fwrite(Template, Values))).
  
  % parse the controller path
  parse_controller_path(CleanPath) ->
  
negative.code: handle("/favicon.ico", Req) -> Req:respond({200, [{"Content-Type", "text/html"}], ""});
  
  handle(Path, Req) ->
    BaseController = top_level_request(clean_path(Path)),
    CAtom = list_to_atom(BaseController),
    ControllerPath = parse_controller_path(clean_path(Path)),
    
    case CAtom of
      home ->
        IndexContents = case file:read_file("web/wonderland/index.html") of
          {ok, Contents} -> Contents;
          _ -> "
  