# NAME Dispatcher::Small - Small dispatcher with Regular-Expression # SYNOPSIS use Dispatcher::Small; my $ds = Dispatcher::Small->new( qr'^/user/(?.+)' => { action => \&user }, qr'^/' => { action => \&root }, ); my $res = $ds->match('/user/oreore'); ### $res = { action => sub {...}, id => 'oreore' } # DESCRIPTION "Dispatcher::Small" is a dispatcher class that is written in perl, and is maybe smallest one of them in the world... maybe. # REQUIREMENT Dispatcher::Small requires perl-5.10 or later. # METHODS ## new my %dispatch_rule = ( qr'^/user/(?.+)' => \&user, qr'^/' => \&root, ); my $object = Dispatcher::Small->new( %dispatch_rule ); Constructor method. ## match my $res = $object->match('/user/oreore'); Returns matching result as hashref. # LICENSE Copyright (C) ytnobody. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. # AUTHOR ytnobody