3 package Devel::REPL::Plugin::DDC;
5 use Devel::REPL::Plugin;
6 use Data::Dumper::Concise ();
7 use namespace::autoclean;
9 around 'format_result' => sub {
12 my $to_dump = (@_ > 1) ? [@_] : $_[0];
15 if (overload::Method($to_dump, '""')) {
18 $out = Data::Dumper::Concise::Dumper($to_dump);
32 Devel::REPL::Plugin::DDC - Format results with Data::Dumper::Concise
38 my $repl = Devel::REPL->new;
39 $repl->load_plugin('DDS');
42 # after you run re.pl: