CP1251编码哈希转JSON：避免字符转义的其他可行方案？

我在处理CP1251编码的Web表单数据时，需要将哈希数据转换为JSON。当使用以下代码时：

my $href = {a => "дот"};
my $str = to_json($href, {utf8 => 0});

use Data::Dumper;
print Dumper($str); # 输出类似 {"a": "\x{c4}\x{ee}\x{e8}"}

我需要生成不进行字符转换的JSON字符串。目前已有的可行方案如下：

方案一：

my $str = encode('cp1251', decode('cp1251', to_json($href, {utf8 => 0}) ));
print Dumper($str); # 输出 {"a": "дот"}

方案二：

my $str = to_json($href, {utf8 => 0});
utf8::downgrade($str);
print Dumper($str); # 输出 {"a": "дот"}

请问还有哪些正确的解决方案？

内容的提问来源于stack exchange，提问作者Bener Beer