NAME

Router::Dumb::Helper::FileMapper - something to build routes out of a dumb tree of files

VERSION

version 0.001

OVERVIEW

The FileMapper helper looks over a tree of files and adds routes to a Router::Dumb object based on those files.

For example, imagine the following file hierarchy:

templates
templates/pages
templates/pages/help
templates/pages/images
templates/pages/images/INDEX
templates/pages/INDEX
templates/pages/legal
templates/pages/legal/privacy
templates/pages/legal/tos

With the following code...

use Path::Class qw(dir);

my $r = Router::Dumb->new;

Router::Dumb::Helper::FileMapper->new({
  root => 'templates/pages',
  target_munger => sub {
    my ($self, $filename) = @_;
    dir('pages')->file( file($filename)->relative($self->root) )
                ->stringify;
  },
})->add_routes_to($r);

...the router will have a route so that:

$r->route( '/legal/privacy' )->target eq 'pages/legal/privacy';

These routes never have placeholders, and if files in the tree have colons at the beginning of their names, an exception will be thrown. Similarly, slurpy routes will never be added, and files named * are forbidden.

Files named INDEX are special: they cause a route for the directory's name to exist.

ATTRIBUTES

root

This is the name of the root directory to scan when adding routes.

target_munger

This attribute (which has a default no-op value) must be a coderef. It is called like a method, with the first non-self argument being the file responsible for the route. It should return the target for the route to be added.

parts_munger

This attribute (which has a default no-op value) must be a coderef. It is called like a method, with the first non-self argument being an arrayref of the path components of the file responsible for the route. It should return the parts for the route to be added.

METHODS

add_routes_to

$helper->add_routes_to( $router );

This message tells the helper to scan its directory root and add routes to the given router. The helper can be used over and over.

AUTHOR

Ricardo Signes <rjbs@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2011 by Ricardo Signes.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.