X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDevel%2FDwarn.pm;fp=lib%2FDevel%2FDwarn.pm;h=9029cc0d3672cc098e2c8e66e2c7b0350931313b;hb=dc06d25b10a184f408bc56249d2c24e7ec4dacdd;hp=403c742027a4dcadc31ae5a84290cf3d2d245a7e;hpb=d71b0a31f045d77f24c12c9f3e8174b7f4e9441d;p=p5sagit%2FData-Dumper-Concise.git

diff --git a/lib/Devel/Dwarn.pm b/lib/Devel/Dwarn.pm
index 403c742..9029cc0 100644
--- a/lib/Devel/Dwarn.pm
+++ b/lib/Devel/Dwarn.pm
@@ -6,4 +6,43 @@ sub import {
   Data::Dumper::Concise::Sugar->export_to_level(1, @_);
 }
 
+=head1 NAME
+
+Devel::Dwarn - return Dwarn @return_value
+
+=head1 SYNOPSIS
+
+  use Devel::Dwarn;
+
+  return Dwarn some_call(...)
+
+is equivalent to:
+
+  use Data::Dumper::Concise;
+
+  my @return = some_call(...);
+  warn Dumper(@return);
+  return @return;
+
+but shorter. If you need to force scalar context on the value,
+
+  use Devel::Dwarn;
+
+  return DwarnS some_call(...)
+
+is equivalent to:
+
+  use Data::Dumper::Concise;
+
+  my $return = some_call(...);
+  warn Dumper($return);
+  return $return;
+
+=head1 SEE ALSO
+
+This module is really just a shortcut for L<Data::Dumper::Concise::Sugar>, check
+it out for more complete documentation.
+
+=cut
+
 1;