ocaml将字符串UTF8转换为CP1251

Question

帮我写正确的代码，我需要将字符串从utf8转换为cp1251。使用Uutf库。

我的代码不起作用

let str = "русский текст" in
let decode = Uutf.encoding_of_string str in
Uutf.encoding_to_string decode;;

我找到了另一个解决方案。通过库Tk转换字符串。

open Tk;;
let top = openTk ();;
let str = "abracadabra" in
let x = Encoding.convertfrom ~encoding:"utf-8" abracadabra in
print_endline(x);;

Answer 1

据我所知，包括电池和Uutf都没有处理CP1251编码。您可以查看Camomile。

（问自己在源代码的引用文本中使用了什么编码很有趣。）