1 package Data::Dumper::Concise;
10 BEGIN { @ISA = qw(Exporter) }
15 my $dd = Data::Dumper->new([]);
16 $dd->Terse(1)->Indent(1)->Useqq(1)->Deparse(1)->Quotekeys(0)->Sortkeys(1);
18 return $dd->Values([ @_ ])->Dump;
23 Data::Dumper::Concise - Less indentation and newlines plus sub deparsing
27 use Data::Dumper::Concise;
35 local $Data::Dumper::Terse = 1;
36 local $Data::Dumper::Indent = 1;
37 local $Data::Dumper::Useqq = 1;
38 local $Data::Dumper::Deparse = 1;
39 local $Data::Dumper::Quotekeys = 0;
40 local $Data::Dumper::Sortkeys = 1;
50 my $dd = Data::Dumper->new([])
60 { foo => "bar\nbaz", quux => sub { "fleem" } };
62 Data::Dumper::Concise will give you:
73 instead of the default Data::Dumper output:
76 'quux' => sub { "DUMMY" },
81 (note the tab indentation, oh joy ...)
85 This module always exports a single function, Dumper, which can be called
86 with an array of values to dump those values or with no arguments to
87 return the Data::Dumper object it's created. Note that this means that
91 will probably not do what you wanted when @list is empty. In this case use
97 It exists, fundamentally, as a convenient way to reproduce a set of Dumper
98 options that we've found ourselves using across large numbers of applications,
99 primarily for debugging output.
101 The principle guiding theme is "all the concision you can get while still
102 having a useful dump and not doing anything cleverer than setting Data::Dumper
103 options" - it's been pointed out to us that Data::Dump::Streamer can produce
104 shorter output with less lines of code. We know. This is simpler and we've
105 never seen it segfault. But for complex/weird structures, it generally rocks.
106 You should use it as well, when Concise is underkill. We do.
108 Why is deparsing on when the aim is concision? Because you often want to know
109 what subroutine refs you have when debugging and because if you were planning
110 to eval this back in you probably wanted to remove subrefs first and add them
111 back in a custom way anyway. Note that this -does- force using the pure perl
112 Dumper rather than the XS one, but I've never in my life seen Data::Dumper
113 show up in a profile so "who cares?".
115 =head1 BUT BUT BUT ...
117 Yes, we know. Consider this module in the ::Tiny spirit and feel free to
118 write a Data::Dumper::Concise::ButWithExtraTwiddlyBits if it makes you
119 happy. Then tell us so we can add it to the see also section.
123 This package also provides:
125 L<Data::Dumper::Concise::Sugar> - provides Dwarn and DwarnS convenience functions
127 L<Devel::Dwarn> - shorter form for Data::Dumper::Concise::Sugar
131 We use for some purposes, and dearly love, the following alternatives:
133 L<Data::Dump> - prettiness oriented but not amazingly configurable
135 L<Data::Dump::Streamer> - brilliant. beautiful. insane. extensive. excessive. try it.
137 L<JSON::XS> - no, really. If it's just plain data, JSON is a great option.
141 mst - Matt S. Trout <mst@shadowcat.co.uk>
145 frew - Arthur Axel "fREW" Schmidt <frioux@gmail.com>
149 Copyright (c) 2009 the Data::Dumper::Concise L</AUTHOR> and L</CONTRIBUTORS>
154 This library is free software and may be distributed under the same terms