Plack-Middleware-DebugRequestParams

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "parent" : "0",
            "perl" : "5.008005"
         }
      },
      "test" : {
         "requires" : {
            "Capture::Tiny" : "0.12",
            "HTTP::Request::Common" : "0",
            "Plack::Test" : "0",
            "Test::Base::Less" : "0",
            "Test::Differences" : "0",
            "Test::More" : "0.98"
         }
      }
   },
   "provides" : {
      "Plack::Middleware::DebugRequestParams" : {
         "file" : "lib/Plack/Middleware/DebugRequestParams.pm",
         "version" : "0.06"
      }
   },

META.yml  view on Meta::CPAN

---
abstract: 'debug request parameters (inspired by Catalyst)'
author:
  - 'Hiroki Honda <cside.story@gmail.com>'
build_requires:
  Capture::Tiny: 0.12
  HTTP::Request::Common: 0
  Plack::Test: 0
  Test::Base::Less: 0
  Test::Differences: 0
  Test::More: 0.98
configure_requires:
  CPAN::Meta: 0
  CPAN::Meta::Prereqs: 0
  Module::Build: 0.38
dynamic_config: 0
generated_by: 'Minilla/v0.4.3, CPAN::Meta::Converter version 2.130880'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html

cpanfile  view on Meta::CPAN

requires 'perl', '5.008001';

on 'test' => sub {
    requires 'Test::More', '0.98';
    requires 'Test::Base::Less';
    requires 'Test::Differences';
    requires 'HTTP::Request::Common';
    requires 'Plack::Test';
    requires 'Capture::Tiny', '0.12';
};

requires 'parent';
requires 'Plack::Request';
requires 'Text::ASCIITable';
requires 'Text::VisualWidth';

t/01_basic.t  view on Meta::CPAN

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use Test::Base::Less;
use Test::Differences qw(eq_or_diff);
use HTTP::Request::Common qw(GET POST);
use Plack::Test qw(test_psgi);
use Capture::Tiny qw(capture_stderr);
use Plack::Middleware::DebugRequestParams;

my $app = sub { [ 200, ["Content-Type" => "text/plain"], ['200 OK'] ] };
$app = Plack::Middleware::DebugRequestParams->wrap($app);

filters {
    method   => [qw(chomp)],

t/02_ignore_path.t  view on Meta::CPAN

#!/usr/bin/env perl
use strict;
use warnings;
use Test::More;
use Test::Base::Less;
use Test::Differences qw(eq_or_diff);
use HTTP::Request::Common qw(GET POST);
use Plack::Test qw(test_psgi);
use Capture::Tiny qw(capture_stderr);
use Plack::Middleware::DebugRequestParams;

my $app = sub { [ 200, ["Content-Type" => "text/plain"], ['200 OK'] ] };
$app = Plack::Middleware::DebugRequestParams->wrap($app,
    ignore_path => qr{^/static/},
);