【Perl】Data::Dumper 日本語出力方法は?

utf8でスクリプト書いてます。
Dumper出力の日本語が”¥x{1234}”となってしまいます。
日本語表示する方法ありますでしょうか?
---------------------
use utf8;
use Data::Dumper;
use lib ’./lib’;
use Jcode;

$hash[0]{’key’}=[ ’あ’, ’い’, ’う’ ];

print Dumper($hash[0]);
print jcode(Dumper($hash[0]))->sjis;
binmode(STDOUT, ”:encoding(shiftjis)”);
print Dumper($hash[0]);
-----------------------

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:2005/08/03 12:24:42
  • 終了:--

回答(1件)

id:asakura-t No.1

浅倉卓司回答回数151ベストアンサー獲得回数22005/08/03 17:14:04

ポイント100pt

$dump = Dumper( $hash[0] );

$dump =~ s/¥¥x{([0-9a-z]+)}/chr(hex($1))/ge;

print $dump;


ではいかがでしょう。

# binmodeは適宜設定してるとして

id:radio3

バッチリです!!ありがとうございました!!!

2005/08/03 19:15:55

コメントはまだありません

この質問への反応(ブックマークコメント)

トラックバック

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません