anchor.diff:              false ->    none
           end,
   
  +    %% Like strig to Regex string
  +        ?assertEqual(<<"^Sm.th$">>, transform_like(<<"Sm_th">>, <<>>)),
  +        ?assertEqual(<<"^.*Sm.th.*$">>, transform_like(<<"%Sm_th%">>, <<>>)),
  +        ?assertEqual(<<"^.A.*Sm.th.*$">>, transform_like(<<"_A%Sm_th%">>, <<>>)),
  +
       %% Regular Expressions
           RE1 = like_compile("abc_123%@@"),
           ?assertEqual(true,re_match(RE1,"abc_123%@@")),         
  
positive.code: 
  like_compile(S) -> like_compile(S, <<>>).
  
  like_compile(S, Esc) when is_list(S);is_binary(S) ->
      Escape = if 
          Esc =:= "" ->       "";
          Esc =:= <<>> ->     "";
          is_list(Esc) ->     "[^"++Esc++"]";
  
negative.code:     end,
      S1 = re:replace(S, Escape++"%", ".*", [global, {return, binary}]),
      S2 = re:replace(S1, Escape++"_", ".", [global, {return, binary}]),
      list_to_binary(["^",S2,"$"]).
  
  re_match(never_match, _) -> false;
  re_match(RE, S) when is_list(S);is_binary(S) ->
  