The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Test::HTTP::Router - Route Testing

SYNOPSIS

  use Test::More;
  use Test::HTTP::Router;
  use HTTP::Router;

  my $router = HTTP::Router->new;
  $router->add_route('/' => (
      conditions => { method => 'GET' },
      params     => { controller => 'Root', action => 'index' },
  ));

  match_ok $router, '/', { method => 'GET' };
  params_ok $router, '/', { method => 'GET' }, { controller => 'Root', action => 'index' };

METHODS

path_ok($router, $path, $message?)

path_not_ok($router, $path, $message?)

match_ok($router, $path, $conditions, $message?)

match_not_ok($router, $path, $conditions, $message?)

params_ok($router, $path, $conditions, $params, $message?)

params_not_ok($router, $path, $conditions, $params, $message?)