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