3 package Devel::REPL::Plugin::DDC;
5 our $VERSION = '1.003027';
7 use Devel::REPL::Plugin;
8 use Data::Dumper::Concise ();
9 use namespace::autoclean;
11 around 'format_result' => sub {
14 my $to_dump = (@_ > 1) ? [@_] : $_[0];
17 if (overload::Method($to_dump, '""')) {
20 $out = Data::Dumper::Concise::Dumper($to_dump);
34 Devel::REPL::Plugin::DDC - Format results with Data::Dumper::Concise
40 my $repl = Devel::REPL->new;
41 $repl->load_plugin('DDS');
44 # after you run re.pl: