3 package Devel::REPL::Plugin::DDC;
5 use Devel::REPL::Plugin;
6 use Data::Dumper::Concise ();
8 around 'format_result' => sub {
11 my $to_dump = (@_ > 1) ? [@_] : $_[0];
14 if (overload::Method($to_dump, '""')) {
17 $out = Data::Dumper::Concise::Dumper($to_dump);
31 Devel::REPL::Plugin::DDC - Format results with Data::Dumper::Concise
37 my $repl = Devel::REPL->new;
38 $repl->load_plugin('DDS');
41 # after you run re.pl: