NAME Perinci::Result::Format - Format envelope result VERSION version 0.32 SYNOPSIS DESCRIPTION This module formats enveloped result to YAML, JSON, etc. It uses Data::Format::Pretty for the backend. It is used by other Perinci modules like Perinci::CmdLine and Perinci::Access::HTTP::Server. The default supported formats are: * json Using Data::Format::Pretty::YAML. * text-simple Using Data::Format::Pretty::SimpleText. * text-pretty Using Data::Format::Pretty::Text. * text Using Data::Format::Pretty::Console. * yaml Using Data::Format::Pretty::YAML. VARIABLES %Perinci::Result::Format::Formats => HASH Contains a mapping between format names and Data::Format::Pretty::* module names + MIME type. $Enable_Decoration => BOOL (default: 1) Decorations include color or other markup, which might make a data structure like JSON or YAML string become invalid JSON/YAML. This should be turned off if one wants to send the formatting over network. $Enable_Cleansing => BOOL (default: 0) If enabled, cleansing will be done to data to help make sure that data does not contain item that cannot be handled by formatter. for example, JSON format cannot handle circular references or complex types other than hash/array. FUNCTIONS None is currently exported/exportable. format($res, $format) => STR Format enveloped result $res with format named $format. Result metadata ("$res->[3]") is also checked for key named "result_format_options". The value should be a hash like this "{ FORMAT_NAME => OPTS, ... }". This way, function results can specify the details of formatting. An example enveloped result: [200, "OK", ["foo", "bar", "baz"], { result_format_options => { "text" => {list_max_columns=>1}, "text-pretty" => {list_max_columns=>1}, } }] The above result specifies that if it is displayed using "text" or "text-pretty" format, it should be displayed in one columns instead of multicolumns. FAQ How to add support for new formats? First make sure that Data::Format::Pretty:: module is available for your format. Look on CPAN. If it's not, i't also not hard to create one. Then, add your format to %Perinci::Result::Format::Formats hash: use Perinci::Result::Format; # this means format named 'xml' will be handled by Data::Format::Pretty::XML $Perinci::Result::Format::Formats{xml} = ['XML', 'text/xml']; SEE ALSO Data::Format::Pretty AUTHOR Steven Haryanto COPYRIGHT AND LICENSE This software is copyright (c) 2013 by Steven Haryanto. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.