Erlang: convert any string to binary utf8

I took half a day, until I found a wonderful module xmerl_ucs. It is available in Erlangen R14B


uniconvert(String) ->
  try xmerl_ucs:from_utf8(String) of
    _ ->             
      list_to_binary(String)
  catch
    exit:{ucs,{bad_utf8_character_code}} -> 
      list_to_binary(xmerl_ucs:to_utf8(String))
  end.




coded by nessus