環境
- Perl 5.8
- EUC-JP
Perlで、をJSONを作成し連想配列又は、配列に格納すると文字化けしてしまうみたいです。
lang
1my %program = ( 2 '備考' => ほげほげ, 3); 4 5my $json = JSON->new->utf8(0)->encode(\program); 6print $json; 7# JSONになっている 8# {"備考":"ほげほげ"} 9 10my %hash = ( 11 'JSON' => $json, 12); 13 14print Dumper %hash; 15# 文字化けする 16# "{\"\x{c8}\x{f7}\x{b9}\x{cd}\":\"\x{a4}\x{db}\x{a4}\x{b2}\x{a4}\x{db}\x{a4}\x{b2}\"}"
扱う文字コードはEUC-JPです。
utf8ふらぐあたりの関係かなと思って、色々encode/decodeしてみましたが、うまくいきませんでした。
この問題、ご存知のかたいらっしゃいますでしょうか?
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
退会済みユーザー
2015/07/01 13:41 編集
2015/07/01 14:18
2015/07/01 14:51
退会済みユーザー
2015/07/01 14:52