/ 
Perinci-Result-Format-0.34
River stage two • 7 direct dependents • 34 total dependents
/ Perinci::Result::Format

NAME

Perinci::Result::Format - Format envelope result

VERSION

version 0.34

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::<FORMAT> 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 <stevenharyanto@gmail.com>

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.