如何替换字符串

Question

我正在编写一个函数来用短划线替换字符串中的所有下划线。例如：

underscores_to_dashes("erlang_is_great") = "erlang-is-great"

目前我正在使用以下功能：

underscores_to_dashes(String) ->
    [case Char of 95 -> 45; _ -> Char end || Char <- String].

在这个实现中，用哪个字符替换哪个字符并不明显，我必须使用列表理解和case语句。

是否有更简单的方法来实现此类功能？也许我错过了一些内置的erlang功能？