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::YAML; # ABSTRACT: Parse YAML use YAML::Syck; use Moose; extends 'MooseX::Net::API::Parser'; sub encode { my ($self, $content) = @_; return Dump($content); } sub decode { my ($self, $content) = @_; return Load($content); } 1; =head1 SYNOPSIS =head1 DESCRIPTION