t/aggregate/live_engine_request_escaped_path.t

   1 use strict;
   2 use warnings;
   3
   4 use FindBin;
   5 use lib "$FindBin::Bin/../lib";
   6
   7 use Test::More tests => 6;
   8 use Catalyst::Test 'TestApp';
   9
  10 # test that un-escaped can be feteched.
  11 {
  12
  13     ok( my $response = request('http://localhost/args/params/one/two') );
  14     ok( $response->is_success, 'Response Successful 2xx' );
  15     is( $response->content, 'onetwo' );
  16 }
  17
  18 # test that request with URL-escaped code works.
  19 {
  20     ok( my $response = request('http://localhost/args/param%73/one/two') );
  21     ok( $response->is_success, 'Response Successful 2xx' );
  22     is( $response->content, 'onetwo' );
  23 }
  24