2008-05-02Data::DumperでUTF-8フラグつき文字列をエスケープさせないようにするには ? ku #!/usr/local/bin/perl -w use strict; use lib qw(/home/hoge/perl/lib/5.10.0 /home/hoge/perl/lib/site_perl /home/hoge/perl/lib/perl5); use utf8; use LWP; use Data::Dumper; { package Data::Dumper; sub qquote { return shift; } } $Data::Dumper::Useperl = 1; use XML::RSS; binmode(STDERR, ':raw :encoding(eucjp)'); #binmode(STDIN, ':raw :encoding(utf8)'); #
