3 package Devel::REPL::Plugin::DDS;
4 # ABSTRACT: Format results with Data::Dump::Streamer
6 our $VERSION = '1.003029';
8 use Devel::REPL::Plugin;
9 use Data::Dump::Streamer ();
10 use namespace::autoclean;
12 around 'format_result' => sub {
17 if (@to_dump > 1 || ref $to_dump[0]) {
18 if (@to_dump == 1 && overload::Method($to_dump[0], '""')) {
21 my $dds = Data::Dump::Streamer->new;
22 $dds->Freezer(sub { "$_[0]"; });
42 my $repl = Devel::REPL->new;
43 $repl->load_plugin('DDS');
46 # after you run re.pl: