Data::Dumper::Concise
確かに簡素になりますね。
$ cpan Data::Dumper::Concise CPAN: Storable loaded ok (v2.27) Going to read '/home/naogawa/.cpan/Metadata' Database was generated on Wed, 05 Jun 2013 16:07:52 GMT CPAN: LWP::UserAgent loaded ok (v6.04) CPAN: Time::HiRes loaded ok (v1.972101) Fetching with LWP: http://cpan.mirror.uber.com.au/authors/01mailrc.txt.gz (途中省略) Installing /usr/share/man/man3/Data.Dumper.Concise.Sugar.3pm Installing /usr/share/man/man3/Devel.Dwarn.3pm Appending installation info to /usr/lib/perl5/5.14/i686-cygwin-threads-64int/perllocal.pod FREW/Data-Dumper-Concise-2.020.tar.gz /usr/bin/make install -- OK ~/perl $ perl -MData::Dumper -e 'my $foo = {1=>'banana', 2=>'orange', 3=>'poteto'};print Dumper($foo);' $VAR1 = { '1' => 'banana', '3' => 'poteto', '2' => 'orange' }; ~/perl $ perl -MData::Dumper::Concise -e 'my $foo = {1=>'banana', 2=>'orange', 3=>'poteto'};print Dumper($foo);' { 1 => "banana", 2 => "orange", 3 => "poteto" }
Data::Dumper::ConciseがData::DumperのDumperサブルーチンを書き換えていますが、このことをなんと言うのだろうか?オーバーロードでもないし。。。