IT練習ノート

IT関連で調べたこと(実際は嵌ったこと)を書いています。

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サブルーチンを書き換えていますが、このことをなんと言うのだろうか?オーバーロードでもないし。。。