anchor.diff:  %%
   %%    [vhosts]
   %%    *.example.com = /*
  -%%    $dbname.example.com = /$dbname
  -%%    $ddocname.$dbname.example.com = /$dbname/_design/$ddocname/_rewrite
  +%%    :dbname.example.com = /:dbname
  +%%    :ddocname.:dbname.example.com = /:dbname/_design/:ddocname/_rewrite
   %%
   %% First rule pass wildcard as dbname, second do the same but use a
   %% variable name and the third one allows you to use any app with
  
positive.code: 
  
  split_host_port(HostAsString) ->
      case string:tokens(HostAsString, ":") of
          [HostPart, PortPart] ->
              {split_host(HostPart), list_to_integer(PortPart)};
          [HostPart] ->
              {split_host(HostPart), 80};
          [] ->
              %% no host header
              {[], 80}
      end.
  
  split_host(HostAsString) ->
  
negative.code: 
  parse_var(P) ->
      case P of 
          ":" ++ Var ->
              {bind, Var};
          _ -> P
      end.
  