
Path::Router - A tool for routing paths

my $router = Path::Router->new;
$router->add_route('blog' => (
defaults => {
controller => 'blog',
action => 'index',
},
# you can provide a fixed "target"
# for a match as well, this can be
# anything you want it to be ...
target => My::App->get_controller('blog')->get_action('index')
));
$router->add_route('blog/:year/:month/:day' => (
defaults => {
controller => 'blog',
action => 'show_date',
},
# validate with ...
validations => {
# ... raw-Regexp refs
year => qr/\d{4}/,
# ... custom Moose types you created
month => 'NumericMonth',
# ... Moose anon-subtypes created inline
day => subtype('Int' => where { $_ <= 31 }),
}
));
$router->add_route('blog/:action/?:id' => (
defaults => {
controller => 'blog',
},
validations => {
action => qr/\D+/,
id => 'Int', # also use plain Moose types too
}
));
# ... in your dispatcher
# returns a Path::Router::Route::Match object
my $match = $router->match('/blog/edit/15');
# ... in your code
my $uri = $router->uri_for(
controller => 'blog',
action => 'show_date',
year => 2006,
month => 10,
day => 5,
);

This module provides a way of deconstructing paths into parameters suitable for dispatching on. It also provides the inverse in that it will take a list of parameters, and construct an appropriate uri for it.
This module places a high degree of importance on reversability. The value produced by a path match can be passed back in and you will get the same path you originally put in. The result of this is that it removes ambiguity and therefore reduces the number of possible mis-routings.
This module also provides additional tools you can use to test and verify the integrity of your router. These include:
Yes, this is based on Ruby on Rails ActionController::Routing::Routes, however, it has one important difference.
It is in Perl :)


This is still a relatively new module, even though it has been sitting on my drive un-used for over a year now. We are only just now using it at $work, so there still may be bugs lurking. For that very reason I have made the $DEBUG variable more accessible so that you can turn on the verbose debug logging with:
$Path::Router::DEBUG = 1;
And possibly help clear out some bugs lurking in the dark corners of this module.

All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT.

Stevan Little <stevan.little@iinteractive.com>

Copyright 2008 Infinity Interactive, Inc.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.