view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: 1.4
name: Catalyst-TraitFor-Request-DecodedParams
no_index:
  directory:
    - inc
    - t
requires:
  JSON::Any: 0
  Moose: 0
  Try::Tiny: 0
  namespace::autoclean: 0
resources:
  license: http://dev.perl.org/licenses/
  repository: git://github.com/wreis/Catalyst-TraitFor-Request-DecodedParams.git
version: 0.02

Makefile.PL  view on Meta::CPAN

readme_from;
repository 'git://github.com/wreis/Catalyst-TraitFor-Request-DecodedParams.git';

test_requires 'Test::More';
test_requires 'CatalystX::RoleApplicator';
test_requires 'Catalyst::Runtime' => '5.80029';

requires 'Moose';
requires 'namespace::autoclean';
requires 'JSON::Any';
requires 'Try::Tiny';

author_tests('t/author');

auto_install;

WriteAll;

lib/Catalyst/TraitFor/Request/DecodedParams/JSON.pm  view on Meta::CPAN

package Catalyst::TraitFor::Request::DecodedParams::JSON;

use Moose::Role;
use namespace::autoclean;
use JSON::Any;
use Try::Tiny;

our $VERSION = '0.01';

with 'Catalyst::TraitFor::Request::DecodedParams';

sub _build_params_decoder { return JSON::Any->new(allow_nonref => 1) }

sub _do_decode_params {
    my ( $self, $params ) = @_;
    my $decoder = $self->_params_decoder;