Catalyst-ActionRole-QueryParameter

 view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

---
abstract: 'Constraints for your Query parameters'
author:
  - 'John Napiorkowski <jjnapiork@cpan.org>'
build_requires:
  Catalyst: '5.90103'
  HTTP::Request::Common: '0'
  Test::Most: '0'
  Type::Tiny: '1.000005'
configure_requires:
  ExtUtils::MakeMaker: '0'
dynamic_config: 0
generated_by: 'Dist::Zilla version 6.007, CPAN::Meta::Converter version 2.150005'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'

Makefile.PL  view on Meta::CPAN

  "DISTNAME" => "Catalyst-ActionRole-QueryParameter",
  "LICENSE" => "perl",
  "NAME" => "Catalyst::ActionRole::QueryParameter",
  "PREREQ_PM" => {
    "Catalyst" => "5.90103",
    "Moose" => "2.000002",
    "Scalar::Util" => 0
  },
  "TEST_REQUIRES" => {
    "Catalyst" => "5.90103",
    "HTTP::Request::Common" => 0,
    "Test::Most" => 0,
    "Type::Tiny" => "1.000005"
  },
  "VERSION" => "0.09",
  "test" => {
    "TESTS" => "t/*.t"
  }
);


my %FallbackPrereqs = (
  "Catalyst" => "5.90103",
  "HTTP::Request::Common" => 0,
  "Moose" => "2.000002",
  "Scalar::Util" => 0,
  "Test::Most" => 0,
  "Type::Tiny" => "1.000005"
);


unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};
  delete $WriteMakefileArgs{BUILD_REQUIRES};

dist.ini  view on Meta::CPAN

repository.type = git
 
[Prereqs]
Moose = 2.000002
Scalar::Util = 0
Catalyst = 5.90020

[Prereqs / TestRequires]
Test::Most = 0
Catalyst = 5.90103
HTTP::Request::Common = 0
Type::Tiny = 1.000005

t/basic.t  view on Meta::CPAN

use strict;
use warnings FATAL =>'all';

use FindBin;
use Test::More;
use HTTP::Request::Common qw/GET/;

use lib "$FindBin::Bin/lib";
use Catalyst::Test 'TestApp';

is request(GET '/foo?page=100')->content, 'page';
is request(GET '/foo?row=100')->content, 'row';
is request(GET '/foo?page=100&row=100')->content, 'page_and_row';
is request(GET '/foo')->content, 'no_query';

is request(GET '/chained?page=100')->content, 'page';

t/constraints.t  view on Meta::CPAN

  use base 'Catalyst::Controller';


  package MyApp;
  use Catalyst;
  
  MyApp->setup;
}

use HTTP::Request::Common;
use Catalyst::Test 'MyApp';

{
  my ($res, $c) = ctx_request( '/foo?page=2&order=2' );
  is $res->content, 'page';
}

{
  my ($res, $c) = ctx_request( '/order?page=2&order=2' );
  is $res->content, 'fail';