CatalystX-DebugFilter

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

    "namespace::autoclean" => 0,
    "perl" => "5.008"
  },
  "test_requires" => {
    "Catalyst" => 0,
    "Catalyst::Controller" => 0,
    "Catalyst::Log" => 0,
    "Catalyst::ScriptRunner" => 0,
    "Catalyst::Test" => 0,
    "FindBin" => 0,
    "HTTP::Request::Common" => 0,
    "Moose" => 0,
    "Test::More" => 0,
    "Test::Pod" => "1.14",
    "Test::Pod::Coverage" => "1.04",
    "Test::WWW::Mechanize::Catalyst" => 0,
    "lib" => 0,
    "ok" => 0,
    "strict" => 0,
    "warnings" => 0
  }
);


my %fallback_build_requires = (
  "Catalyst" => 0,
  "Catalyst::Controller" => 0,
  "Catalyst::Log" => 0,
  "Catalyst::ScriptRunner" => 0,
  "Catalyst::Test" => 0,
  "FindBin" => 0,
  "HTTP::Request::Common" => 0,
  "Module::Build" => "0.28",
  "Moose" => 0,
  "Test::More" => 0,
  "Test::Pod" => "1.14",
  "Test::Pod::Coverage" => "1.04",
  "Test::WWW::Mechanize::Catalyst" => 0,
  "lib" => 0,
  "ok" => 0,
  "strict" => 0,
  "warnings" => 0

META.json  view on Meta::CPAN

         }
      },
      "test" : {
         "requires" : {
            "Catalyst" : "0",
            "Catalyst::Controller" : "0",
            "Catalyst::Log" : "0",
            "Catalyst::ScriptRunner" : "0",
            "Catalyst::Test" : "0",
            "FindBin" : "0",
            "HTTP::Request::Common" : "0",
            "Moose" : "0",
            "Test::More" : "0",
            "Test::Pod" : "1.14",
            "Test::Pod::Coverage" : "1.04",
            "Test::WWW::Mechanize::Catalyst" : "0",
            "lib" : "0",
            "ok" : "0",
            "strict" : "0",
            "warnings" : "0"
         }

META.yml  view on Meta::CPAN

abstract: 'Provides configurable filtering of data that is logged to the debug logs (and error screen)'
author:
  - 'Brian Phillips <bphillips@cpan.org>'
build_requires:
  Catalyst: '0'
  Catalyst::Controller: '0'
  Catalyst::Log: '0'
  Catalyst::ScriptRunner: '0'
  Catalyst::Test: '0'
  FindBin: '0'
  HTTP::Request::Common: '0'
  Module::Build: '0.28'
  Moose: '0'
  Test::More: '0'
  Test::Pod: '1.14'
  Test::Pod::Coverage: '1.04'
  Test::WWW::Mechanize::Catalyst: '0'
  lib: '0'
  ok: '0'
  strict: '0'
  warnings: '0'

t/live-test.t  view on Meta::CPAN

like $log, qr{X-Res-Secret-2.*FILTERED}, 'X-Res-Secret-2 is filtered';
like $log, qr{terceS}, 'Secret reversed';
like $log, qr{NotASecret}, 'other response headers left untouched is filtered';

$logger->CLEAR;
$mech->{catalyst_debug} = 1;
my $error_screen = $mech->get('http://localhost/boom?foo_param=secret')->content;
my $expected_debug = qr/parameters\s+=> \{ foo_param => "\[FILTERED\]" \}/;
like $error_screen, $expected_debug, 'filtered on debug screen';

use HTTP::Request::Common;
my $file_contents = "This is my file!";
my $request = POST(
	'http://localhost/upload',
	'Content_Type' => 'multipart/form-data',
	'Content'      => [ upload_file => [ undef, 'test_file.txt', Content => $file_contents ] ]
);
my $response = $mech->request($request);
is($response->content, $file_contents, 'uploaded file content matches');

done_testing;