Provided by: libpoet-perl_0.16-1_all bug


       Poet::Util::Debug - Debug utilities


           # In a script...
           use Poet::Script;

           # In a module...
           use Poet;

           # Automatically available in Mason components

           # then...

           # die with value
           dd $data;

           # print value to STDERR
           dp $data;

           # print value to logs/console.log
           dc $data;

           # return value prepped for HTML
           dh $data;

           # same as above with full stacktraces
           dds $data;
           dps $data;
           dcs $data;
           dhs $data;


       These debug utilities are automatically imported wherever "use Poet" or "use Poet::Script"
       appear, and in all components. Because let's face it, debugging is something you always
       want at your fingertips.

       However, for safety, the short named versions of these utilities are no-ops outside of
       development mode, in case debug statements accidentally leak into production (we've all
       done it). You have to use longer, less convenient names outside of development for them to


       Each of these utilities takes a single scalar value. The value is serialized with
       Data::Dumper and prefixed with a file name, line number, and pid. e.g.

           dp { a => 5, b => 6 };

       prints to STDERR

           [dp at ./ line 6.] [1436] {
             a => 5,
             b => 6

       The variants suffixed with 's' additionally output a full stack trace.

       dd ($val), dds ($val)
           Die with the serialized $val.

       dp ($val), dps ($val)
           Print the serialized $val to STDERR. Useful in scripts.

       dc ($val), dcs ($val)
           Append the serialized $val to "console.log" in the "logs" subdirectory of the
           environment. Useful as a quick alternative to full-bore logging.

       dh ($val), dhs ($val)
           Returns the serialized $val, surrounded by "<pre> </pre>" tags. Useful for embedding
           in Mason components, e.g.

               <% dh($data) %>

   Live variants
       Each of the functions above must be appended with "_live" in order to work in live mode.

           # This is a no-op in live mode
           dp [$foo];

           # but this will work
           dp_live [$foo];




       Jonathan Swartz <>


       This software is copyright (c) 2012 by Jonathan Swartz.

       This is free software; you can redistribute it and/or modify it under the same terms as
       the Perl 5 programming language system itself.