blob: 58cc95ab2ed519a93af89ea0895c68af0b7bd486 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
package MooseX::Net::API::Parser::JSON;
# ABSTRACT: Parse JSON
use JSON;
use Moose;
extends 'MooseX::Net::API::Parser';
sub encode {
my ($self, $content) = @_;
return JSON::encode_json($content);
}
sub decode {
my ($self, $content) = @_;
return JSON::decode_json($content);
}
1;
=head1 SYNOPSIS
=head1 DESCRIPTION
|
