diff options
-rw-r--r-- | lib/Reply/Plugin/DataPrinter.pm | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/lib/Reply/Plugin/DataPrinter.pm b/lib/Reply/Plugin/DataPrinter.pm new file mode 100644 index 0000000..88a3b27 --- /dev/null +++ b/lib/Reply/Plugin/DataPrinter.pm @@ -0,0 +1,26 @@ +package Reply::Plugin::DataPrinter; +use strict; +use warnings; +# ABSTRACT: format results using Data::Printer + +use base 'Reply::Plugin'; + +use Data::Printer; + +=head1 SYNOPSIS + + ; .replyrc + [DataPrinter] + +=head1 DESCRIPTION + +This plugin uses L<Data::Printer> to format results. + +=cut + +sub mangle_result { + my ($self, @result) = @_; + return p(@result, return_value => 'dump'); +} + +1; |