anchor.diff:  
   %%--------------------------------------------------------------------
   %% @doc
  -%% Converts key-value pairs to a single x-www-urlencoded binary. Cna be used for
  +%% Converts key-value pairs to a single x-www-urlencoded binary. Can be used for
   %% GET (url) or POST (request body). Performs url encoding on both keys and values.
   %% @end
   %%--------------------------------------------------------------------
  
positive.code: %%--------------------------------------------------------------------
  -spec normalize_email(binary()) -> binary().
  normalize_email(Email) ->
      case binary:split(Email, [<<"@">>], [global]) of
          [Account, Domain] ->
              case Domain of
                  <<"gmail.com">> ->
                      <<(binary:replace(Account, <<".">>, <<"">>, [global]))/binary, "@", Domain/binary>>;
                  _ -> Email
              end;
          _ ->
              Email
      end.
negative.code: %%--------------------------------------------------------------------
  -spec validate_email(binary()) -> boolean().
  validate_email(Email) ->
      case re:run(Email, ?EMAIL_VALIDATION_REGEXP, [{capture, none}]) of
          match -> byte_size(Email) =< ?EMAIL_MAX_LENGTH;
          _ -> false
      end.
  
  